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

Question

我的Excel工作簿包含与下面类似的VBA sub和宏；它们位于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

就这么简单。。。。