在Excel中使用PowerPoint變量（VBA）

-1

我有一個PowerPoint演示文稿和一個Excel文件。在我的PPT我使用一個公共變量Public cnt As Long和以下兩個函數添加到cnt或減去（爲例）：在Excel中使用PowerPoint變量（VBA）

Private Sub CommandButton1_Click() 
cnt = cnt + 1 
Me.CommandButton3.Caption = "cnt up = " & cnt 
End Sub 


Private Sub CommandButton2_Click() 
cnt = cnt - 1 
Me.CommandButton3.Caption = "cnt down = " & cnt 
End Sub

用戶將PPT放映，這將增加或減少在點擊這兩個按鈕中的一個來自cnt變量。所以在PPT節目cnt可能會從1變爲2然後變爲3等等。

我想要的是在excel文件中記錄cnt的值。因此，例如在PPT顯示值cnt應在單元格「A1」中顯示。這可能嗎？

來源

2017-09-27 Dan R

是的，這是可能的PowerPoint中的「說話」的Excel那樣。 – braX

我該怎麼辦？ –

將對'Microsoft.Excel'Object庫的引用添加到您的VBA項目中，在Powerpoint代碼中創建一個'Excel.Application'對象，並使用它打開Excel工作簿並寫入您選擇的工作表。 – FunThomas

這裏有一個後期綁定例如：（這正好到PowerPoint VBA）

Option Explicit 

Public braX As Integer 

Public Sub test() 
    braX = 10 
    Dim xlApp As Object 
    Dim xlBooks As Object 
    Dim xlBook As Object 
    Dim xlSheet As Object 
    Set xlApp = CreateObject("Excel.Application") 
    xlApp.Visible = True 
    Set xlBooks = xlApp.workbooks 
    Set xlBook = xlBooks.Add() 
    Set xlSheet = xlBook.Worksheets(1) 
    xlSheet.Range("A1") = braX 
End Sub

來源

2017-09-27 15:12:11 braX

在Excel中使用PowerPoint變量（VBA）

回答

相關問題