我有一個PowerPoint演示文稿和一個Excel文件。在我的PPT我使用一個公共變量Public cnt As Long和以下兩個函數添加到cnt或減去(爲例): Private Sub CommandButton1_Click()
cnt = cnt + 1
Me.CommandButton3.Caption = "cnt up = " & cnt
End Sub
Private
我在Win10上使用Office 2016 32位。以下代碼完美運行,並且我能夠管理VB6中的Excel和PPT的各個方面。 Public Sub Main()
'*********************BDOK GAM ****************************ú÷åôú
Dim xlApp As Object ' Late binding, or As Ex
我有這個演示幻燈片,它已經有了它的內容。我現在的目標是將新的東西從Excel粘貼到相同的幻燈片中,而不是將新的幻燈片添加到PowerPoint文件中。我正在使用的語言是VBA。 這裏是我的代碼: Sub CreatePowerPoint()
'-------------------------------------------
'ADD A REFERENCE TO THE MICROSOF