0

我的python代码是

import win32com.client as win32
import sys
import pywintypes

WordApp=win32.DispatchEx("Word.Application")
WordApp.Visible = True


doc = WordApp.Documents.Open(r'test.docx', ReadOnly=1)

WordApp.Application.Run('Normal.NewMacros.test1') # no error

WordApp.Application.Run('Normal.NewMacros.test2','22')#error
WordApp.Application.Run('Normal.NewMacros.test2',['22'])#error
WordApp.Application.Run('Normal.NewMacros.test2',22)#error
WordApp.Application.Run('Normal.NewMacros.test2("22")')#error
WordApp.Application.Run('Normal.NewMacros.test2')#error
WordApp.Application.Run('Normal.NewMacros.test2(22))#error

我的vba字码是

Sub test2(Var2 As String)
MsgBox Var2
End Sub

错误是自我。oleobj .InvokeTypes(dispid, 0, wFlags, retType, argTypes, *args), ...

4

0 回答 0