如何使用Python win32com调用Excel VBA函数和subs？

Question

我的Excel工作簿包含类似于下面的VBA子和宏;他们坐在Module1。

如何使用Python win32com模块调用它们？

Public Sub setA1(ByVal s As String)
    ThisWorkbook.ActiveSheet.Range("A1").Value = s
End Sub

Public Function getA1() As String
    getA1 = ThisWorkbook.ActiveSheet.Range("A1").Value
End Function

非常感谢提前！

Answer 1

import win32com.client
xl=win32com.client.Dispatch("Excel.Application")
xl.Workbooks.Open(Filename="c:\\temp\\book1.xls",ReadOnly=1)
xl.Application.Run("setA1", '4')
res = xl.Application.Run("getA1")
print res
xl = 0

就像这一样简单......