PYTHON 调用EXCEL VBA 函数：使用win32com模块

import win32com.clientdef excel_VBA():xls=win32com.client.Dispatch('Excel.Application')xls.Workbooks.Open(r'E:/mypython/NewHztoPy_1102.xls')args = ('陈祉希',' ',0,0,0)ret = xls.Application.Run("HzToPy", '陈祉希',' ',0,0,0).upper()print(ret)xls.Application.Quit()if __name__ == '__main__':excel_VBA()

其中，HzToPy函数如下：

函数原型如下：

“Public Function HzToPy(Hz As String, _

Optional Sep As String = “”“”, _

Optional NotationType As Integer = -1, _

Optional ShowInitialOnly As Boolean = False, _

Optional ShowOnlyOneChar As Boolean = True) As String”

运行结果：

CHEN ZHI XI