import win32com.client
xl = win32com.client.Dispatch("Excel.Application")
xl.Workbooks.Open(Filename=r"C:UsersAdministratorDesktop工作簿1.xlsm")
xl.Application.DisplayAlerts = False
xl.Application.Run("模块1.mcrao")
xl.Application.Save()
xl.Application.DisplayAlerts = True
xl.Application.Quit()
以下是vba测试宏和运行效果:
方法二:
import xlwings as xl
import time
app = xl.App(visible=True, add_book=False)
wb = app.books.open(r"C:UsersAdministratorDesktop工作簿1.xlsm")
macro_run = wb.macro("模块1.mcrao")
macro_run()
wb.save()
wb.close()
time.sleep(3)
app.quit()
以下是vba测试宏和运行效果:



