我有一些VBA PPT宏以及自定義功能區接口。誰的宏從代碼工作正常，但是當製作成ppam插件並添加到PPT插件時，一些命令會拋出此錯誤消息，但是該宏運行良好，只是想停止這些惱人的消息。 subs和函數都是Public，它仍然顯示相同的錯誤。請幫助 Public Sub frmFeedNotes_show()
frmFeedNotes.Show
End Sub
<!--RibbonX Vis
我正在試圖創建一個計數器，該計數器在Powerpoint演示文稿的VBA中每秒增加1。這是我到目前爲止所提出的。 Sub countup()
Dim index As Integer
index = 0
Do Until index > 100
index = index + 1
DoEvents
With ActivePresen
我需要通過VBA設置文字的透明度，事實上，我需要爲整個形狀設置透明度，但這是我堅持使用的文字。 我似乎無法瀏覽對象模型找到透明度物業 Function SetTransparency(Value As Single)
On Error GoTo AbortNameShape
If ActiveWindow.Selection.ShapeRange.Count = 0 Then
Ms
我有一個PowerPoint演示文稿和一個Excel文件。在我的PPT我使用一個公共變量Public cnt As Long和以下兩個函數添加到cnt或減去（爲例）： Private Sub CommandButton1_Click()
cnt = cnt + 1
Me.CommandButton3.Caption = "cnt up = " & cnt
End Sub
Private