當前位置：首頁 > 維修知識 > Excel如何利用VBA事先圓形沿直線移動的效果?

Excel如何利用VBA事先圓形沿直線移動的效果?

文章出處：妙手電腦責任編輯：admin人氣：11發表時間：2021-07-30 00:38:00

Excel是一種比較常用的軟件，但是它里面的許多內容還是比較難的。例如其中使用vba可以制作一種動畫效果，但是如何制作一個圓形沿著直線移動的效果呢？下面小編就為你們講解一下，需要的朋友可以參考一下。

一、添加素材

1、繪制控制按鈕：插入一個矩形形狀，設置格式，如圖所示。

2、繪制圓形圖形：在插入形狀命令中，找到橢圓形形狀，然后按下Shift鍵，繪制圓形。

3·

4

3、繪制直線：插入一條直線。PS：繪制時按下Shift鍵不松。

4、素材整理好之后，如圖所示。包含三塊：控制按鈕，直線和圓形。PS：本教材的素材都是通過插入形狀得到的。

二、VBA代碼
1、進入VBA窗口

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

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

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

三、設置控制按鈕

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

2、控制按鈕設置：讓該按鈕指定以上代碼，即moveshape；

3、實現動畫：按下“開始”控制按鈕即可實現圓形先向右移動，然后向左移動。

Excel現在使用這么普遍，小編上邊整理的方法這種vba制作動畫效果的方法，希望對你們有用。

專業電腦上門維修您身邊的電腦服務專家

Excel如何利用VBA事先圓形沿直線移動的效果?

相關資訊

文章排行

最新文章

推薦文章