要在PPT中實現一個圖片的扭轉,在良多人看來是很簡單的。對于那些沒接觸過VBA的伴侶來說,要在Excel中實現這個結果的確不敢想。本教程就是教你若何在Excel中實現這個結果。
先繪制齒輪,并記住組合外形的名稱(可在名稱框中獲得,本教程是組合 27),具體流程可參考以下鏈接:
35齒輪繪制技巧
(如若趕時候,可用步調二來替代步調一,先用一張圖片或者外形取代齒輪)
具體操作:點擊菜單欄“插入”—“圖片”(或“外形”)。
繪制節制按鈕(本教程編纂文字為 起頭扭轉),并設置其格局,具體操作:
1.插入外形,本教程以插入一個矩形為例;
2.設置格局;
3.同理,建造”暫停“按鈕。
進入VBA窗口,插入模板。
10打開的三種方式
輸入代碼:
Dim k%
Sub xuanzhuan() ‘節制齒輪扭轉
k = 0
Do
Sheets(1).Shapes("組合 27").IncrementRotation -1 ’負數為逆時針動彈
DoEvents
Loop Until k = 1
End Sub
Sub zanting() ‘節制齒輪暫停
k = 1
End Sub
回到Excel界面,將“起頭扭轉”按鈕指心猿意馬扭轉的宏代碼(xuanzhuan),“暫停”按鈕指心猿意馬宏zanting.
點擊“節制”按鈕(起頭扭轉),實現齒輪扭轉;
點擊“暫停”按鈕,扭轉齒輪立馬暫停;
再次點擊“起頭扭轉”,齒輪繼續動彈。
0 篇文章
如果覺得我的文章對您有用,請隨意打賞。你的支持將鼓勵我繼續創作!