我正在使用 Python 来测试 Excel VBA 宏。该宏有两个可选参数。只要省略最后一个或两个参数就可以了。我只是传递前面的参数。我不知道如何处理当第一个可选参数被省略但第二个可选参数被包含时的情况。我不能使用 None,因为 Excel 将其解释为“Null”,这是一种不同的情况。我也不能省略这个参数,因为我在 Python 中遇到语法错误。
使用 win32com 运行 Excel 宏时,如何省略不是最后一个可选参数?
考虑这个宏:
Function getarg(Optional anArg, Optional anotherArg) As String
Dim s As String
If IsMissing(anArg) Then
s = "No argument 1 passed! "
Else
s = "Argument 1 was: " + CStr(anArg) + ". "
End If
If IsMissing(anotherArg) Then
s = s + "No argument 2 passed!"
Else
s = s + "Argument 2 was: " + CStr(anotherArg)
End If
getarg = s
End Function
这是我的Python代码:
import win32com.client as win32
from os.path import join
xl = win32.Dispatch("Excel.Application")
wb = xl.Workbooks.Open(r"C:\Users\...\whatever.xlsm")
print(xl.Run("'{}'!{}.{}".format(join(wb.Path,wb.Name), "reportbuilder", "getarg"), "A", "B"))
print(xl.Run("'{}'!{}.{}".format(join(wb.Path,wb.Name), "reportbuilder", "getarg"), "A"))
print(xl.Run("'{}'!{}.{}".format(join(wb.Path,wb.Name), "reportbuilder", "getarg")))
print(xl.Run("'{}'!{}.{}".format(join(wb.Path,wb.Name), "reportbuilder", "getarg"), None, "B"))
输出为:
Argument 1 was: A. Argument 2 was: B
Argument 1 was: A. No argument 2 passed!
No argument 1 passed! No argument 2 passed!
第四种情况没有输出,因为在 Excel 中我得到“运行时错误'94':无效使用 Null”
一个空列表就可以完成这项工作:
import win32com.client as win32
from os.path import join
xl = win32.Dispatch("Excel.Application")
wb = xl.Workbooks.Open(r"C:\a\b.xlsm")
print(xl.Run("'{}'!{}.{}".format(join(wb.Path,wb.Name), "Module1", "getarg"), "A", "B"))
print(xl.Run("'{}'!{}.{}".format(join(wb.Path,wb.Name), "Module1", "getarg"), "A"))
print(xl.Run("'{}'!{}.{}".format(join(wb.Path,wb.Name), "Module1", "getarg")))
print(xl.Run("'{}'!{}.{}".format(join(wb.Path,wb.Name), "Module1", "getarg"), [], "B"))
返回:
Argument 1 was: A. Argument 2 was: B
Argument 1 was: A. No argument 2 passed!
No argument 1 passed! No argument 2 passed!
No argument 1 passed! Argument 2 was: B
根据 COM 标准,省略的参数作为子类型 VT_EMPTY 的 VARIANT 传递。
在 Pywin32 中,这样的对象是通过
pythoncom.Empty
检索的。
>>> x.Run("getarg",pythoncom.Empty,"A")
'No argument 1 passed! Argument 2 was: A'