从当前工作簿到其他工作簿执行VBA程序

Question

我已经尝试过这个解决方案但仍然有问题，在阅读我的子程序时，我有一个 vba 438 错误。

Sub theTestSub(ByRef targetWorkbook As Workbook)

    MsgBox "Delightful joy."

End Sub


Sub OpenFileAndWorkOnIt()

    Dim targetWorkbook As Workbook
    Set targetWorkbook= Workbooks.Open("C:\Users\somePathThatWorks\...\.xlsm")
    
    theTestSub (targetWorkbook) '"vba error 438 object doesn't support this property or method"
        
End Sub

我怀疑有两件事是我的问题的原因：

• 我的两个同名工作簿上的工作表（工作簿名称不同）
• 缺少参考资料。

感谢您的关注

Answer 1

我找到了！

调用过程时，我们不能在括号内有目标！

theTestSub (targetWorkbook) '<-- Not working
theTestSub targetWorkbook '<-- Good !