在powerpoint和excel VBA之间交换variables

当按下button时,我有一个从excel表中获取一些数据的powerpoint压力。

Set EXL = New Excel.Application EXL.Visible = False Dim XLApp As Excel.Application Set XLApp = GetObject(, "Excel.Application") 

这是我如何设置新的Excel应用程序。

我想知道的是,我怎样才能从我的幻灯片variables发送到Excel工作簿的variables? 我在我的幻灯片幻灯片,我想要在Excel中的variables中使用的文本textfield。 这可能吗? 如果是这样,怎么样?

而且我怎样从一个powerpoint模块中调用excel工作簿中的一个Sub来运行?

(这是来自Access数据库的一些简化的生产代码,powerpoint可能有一些细微的差别)

What I'm wondering is how I can send over a variable from my powerpoint slide into the excel workbook?

 Sub SetXLCellValue( _ FileStr As String, _ TabStr As String, _ Cell As String) Dim XLApp As New Excel.Application Dim ObjXL As Excel.Workbook Set ObjXL = XLApp.Workbooks.Open(FileStr) ObjXL.Worksheets(TabStr).Range(Cell).value = value ObjXL.Save ObjXL.Close True End Sub 

至于在你的Excel应用程序中调用一个Sub,你可以使用

 XLApp.Run("MySub") 

这也有能力传递参数的方法(intellisense应该告诉你的方式)