pywin32调用Access VBA点击事件传可选字符串参数报错如何解决？

报错核心原因 #

1. 你修改了Access按钮原生Click事件的签名，该事件默认无自定义参数，修改后会破坏内置事件绑定，同时COM暴露的方法签名不匹配，直接导致调用失败。
2. 调用窗体控件方法前未提前加载对应窗体时，Forms集合无法识别未打开的窗体对象，也会触发同类COM错误。

可行解决方案 #

推荐使用更稳定的Application.Run方法直接调用VBA业务过程，无需依赖窗体控件事件，修改步骤如下：

步骤1：修改VBA代码

首先恢复原有按钮点击事件的原生签名，再调整Export_Scenario_To_ScenarioDB过程支持传入参数，替代InputBox弹窗：

' 恢复原有按钮点击事件，不要修改签名
Public Sub cmdScenarioExport_Click()
   Export_Scenario_To_ScenarioDB
End Sub

' 调整业务过程，增加可选入参
Public Sub Export_Scenario_To_ScenarioDB(Optional strInput As String = "")
    Dim actualInput As String
    ' 传了参数就用参数，没传再弹出InputBox
    If strInput <> "" Then
        actualInput = strInput
    Else
        actualInput = InputBox("请输入需要的内容") ' 原有弹窗逻辑保留
    End If
    
    ' 此处保留你原来的业务逻辑，把所有用到InputBox返回值的地方替换为actualInput即可
    ' ...... 原有业务代码 ......
End Sub

如果Export_Scenario_To_ScenarioDB定义在私有模块中，需要把修饰符改为Public。

步骤2：修改Python代码

直接调用VBA业务过程，不需要走窗体点击事件，稳定性更高：

import win32com.client as win32

access = win32.Dispatch('Access.Application')
# 可设为False后台静默运行，调试阶段可以设为True看界面
access.Visible = False
try:
    access.OpenCurrentDatabase(r'C:\test\PN.mdb')
    # 直接调用VBA公开过程，传入自定义参数
    access.Run("Export_Scenario_To_ScenarioDB", "hello")
finally:
    # 必须显式释放资源，否则会残留Access后台进程占用mdb文件
    access.CloseCurrentDatabase()
    access.Quit()
    del access

特殊场景补充说明 #

如果一定要调用窗体模块内的自定义过程，需要先提前打开对应窗体：

# 先打开窗体再调用模块内的方法
access.DoCmd.OpenForm("frm_PN_Startup")
access.Run("frm_PN_Startup.你的自定义过程名", "hello")

内容的提问来源于stack exchange，提问作者Reens