我们有另一家公司提供的电子表格。 VBAProject受保护，我不知道密码。 在工作表“主要”上，有一个RectangleRoundedCorners形状，该形状已分配了宏（“创建SAP作业运行列表”）。
我们正在尝试使用VBA自动化流程，但是在触发“创建SAP作业运行清单”宏时遇到了障碍。
我不知道宏所在的模块。由于VBAProject受保护，因此无法循环使用所有VBA组件。
由于收到错误消息（尝试模拟自己的工作簿中的调用后），我怀疑该宏可能在“ ThisWorkbook”模块中。
Application.Run workbookname!macroname
将不起作用：运行时错误'1004'无法运行宏'workbookname！macroname'。该宏可能在此工作簿中不可用，或者所有宏都可能被禁用。
未禁用宏。
我似乎无法直接使用VBA调用宏，因此我希望可以模拟形状的点击。我正在努力寻找合适的代码。
有人可以帮助吗？
预先感谢
答案 0 :(得分：0)
尝试将Shape对象的OnAction属性传递给Application.Run ...
Application.Run Workbooks("Book1.xlsm").Worksheets("Sheet1").Shapes("Rectangle 1").OnAction
相应地更改对工作簿，工作表和形状的引用。