亚洲乱码中文字幕综合,中国熟女仑乱hd,亚洲精品乱拍国产一区二区三区,一本大道卡一卡二卡三乱码全集资源,又粗又黄又硬又爽的免费视频

Excel怎么利用VBA事先圓形沿直線移動(dòng)的效果?

  發(fā)布時(shí)間:2018-03-11 09:46:12   作者:傲天獨(dú)秀   我要評(píng)論
Excel怎么利用VBA事先圓形沿直線移動(dòng)的效果?excel中可以使用vba制作一個(gè)動(dòng)畫效果,該怎么制作一個(gè)圓形沿著直線移動(dòng)的效果,該怎么制作呢?下面我們就來看看詳細(xì)的教程,需要的朋友可以參考下

1、進(jìn)入VBA窗口

2、插入模塊:在菜單欄中找到“插入”—“模塊”。

3、輸入代碼:在模塊中輸入代碼

Sub moveshape()
Dim i%
    Do
        i = i + 1
        Sheet1.Shapes(2).Left = i + 50 ‘圓形圖形向右移動(dòng)
        DoEvents
    Loop Until i = 1000
    Do
        i = i - 1
        Sheet1.Shapes(2).Left = i + 50  ’圓形圖形向左移動(dòng)
        DoEvents
    Loop Until i = 1
End Sub

三、設(shè)置控制按鈕

1、從VBA窗口回到Excel窗口;

2、控制按鈕設(shè)置:讓該按鈕指定以上代碼,即moveshape;

3、實(shí)現(xiàn)動(dòng)畫:按下“開始”控制按鈕即可實(shí)現(xiàn)圓形先向右移動(dòng),然后向左移動(dòng)。

以上就是excel中vba制作動(dòng)畫效果的教程,希望大家喜歡,請(qǐng)繼續(xù)關(guān)注腳本之家。

相關(guān)推薦:

excel怎么使用vba里的copy命令?

excel怎么使用vba的close關(guān)閉工作簿?

excel表格中怎么使用vba中的resize命令?

相關(guān)文章

最新評(píng)論