0
A
回答
0
我找到了簡單的方法。
myshape.ActionSettings(ppMouseOver).AnimateAction = msoTrue
但我不能改變顏色和線條大小。這對我來說就夠了。謝謝。
1
您的宏將需要在特定事件上運行。所以在Powerpoint中你有選擇,如:
- 的MouseDown
- 的MouseMove
- 的MouseUp
您可以按F1鍵,確切地告訴你哪些事件做什麼。
在VBA中不存在名爲'MouseOver'的事件,因此您需要即興發揮,例如使用'MouseMove'事件將鼠標懸停在其上時更改顏色,然後可能會將頁面的'MouseMove'事件更改回當您將鼠標移動到其他位置時的默認顏色。
你應該能夠找到所有在下拉列表中的對象,這些事件在Visual Basic窗口
另一種選擇,而不是使用VBA是玩弄PPT課件動畫和特效可以讓你在同一結果。
0
嘗試這一項上的ActiveX圖片附帶的幻燈片(顯示模式中運行的代碼)
'zmien_w_trybie_prezentacji - VBATools.pl
Private Sub Image1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Call kolor2(Image1)
End Sub
Sub kolor2(osh As Image)
If osh.BackColor = 255 Then _
osh.BackColor = 13998939 Else _
osh.BackColor = 255
End Sub
相關問題
- 1. 如何突出顯示鼠標懸停時的JPanel?
- 2. 如何在鼠標懸停上突出顯示文本
- 3. 爲什麼ListBoxItem在鼠標懸停時不會突出顯示?
- 4. 突出鼠標懸停表
- 5. 突出顯示鼠標懸停時的表格行
- 6. 如何在鼠標懸停在d3.js時突出顯示圓弧
- 7. 顯示在鼠標懸停
- 8. 禁用鼠標懸停突出顯示工具欄按鈕(winapi)
- 9. QListWidget禁用鼠標懸停突出顯示
- 10. 在鼠標懸停上突出顯示文本行
- 11. 鼠標懸停在QTreeView中突出顯示項目?
- 12. leafletjs:在鼠標懸停上突出顯示折線
- 13. 如何在懸停時突出顯示多個跨度標籤?
- 14. 在鼠標懸停時顯示div
- 15. 鼠標懸停時顯示效果並在鼠標懸停時顯示隱藏效果,如何?
- 16. 如何在Silverlight數據網格中刪除鼠標懸停突出顯示和選定的行突出顯示
- 17. d3鼠標懸停的分組條形圖突出顯示組
- 18. JQUERY突出顯示懸停
- 19. 如何在html 5中創建鼠標懸停突出顯示框?
- 20. 如何鼠標懸停在圖標時顯示指針
- 21. 鼠標懸停時顯示div
- 22. 當鼠標懸停在svg地圖上時,突出顯示錶格
- 23. 如何在鼠標懸停在圖像中時顯示圖像?
- 24. 如何顯示鼠標懸停/懸停上單元格的值
- 25. jQuery懸停鼠標懸停/鼠標退出計時
- 26. 如何突出顯示只有博客文章與鼠標懸停鏈接?
- 27. 在鼠標懸停和跳出時顯示兩個div
- 28. SCSS如何在鼠標懸停時顯示此結果
- 29. 如何在鼠標懸停時顯示文本框作爲Dropdownlist
- 30. 如何在鼠標懸停時顯示列表
那就是例如添加很多東西好方法改變顏色,但實施起來很複雜。 – argonist 2013-04-23 12:41:06