gpt4 book ai didi

excel - 如何将 VBScript 宏导入 Excel 工作簿?

转载 作者:行者123 更新时间:2023-12-02 22:16:54 24 4
gpt4 key购买 nike

我有几个 Excel 工作簿。它们都共享相同的宏模块。我想要实现的是,在编辑一个工作簿中的一个模块时,不必在其他工作簿中编辑相同的模块。

当然,我的第一步是在 .bas 文件中保存模块时导出。但问题是我无法在加载时导入它们。

我试过这个:

Private Sub Workbook_Open()
Set objwb = ThisWorkbook
Set oVBC = objwb.VBProject.VBComponents
Set CM = oVBC.Import("C:\Temp\TestModule.bas")
TestFunc
End Sub

同一目录中有一个 TestModule.bas,其内容为:

Function TestFunc()
MsgBox "TestFunc called"
End Function

打开工作簿时,出现编译错误:Sub 或 Function not Defined。如果我手动导入模块,一切都会正常。

感谢您的建议。

最佳答案

像您一样,我无法从 workbook_open 进行导入。您可以将导入代码放在单独的子模块中,然后从 workbook_open 中调用它,如下所示:

Private Sub Workbook_Open()
Application.OnTime Now, "ImportCode"
End Sub

这似乎对我有用(直接调用没有......)

关于excel - 如何将 VBScript 宏导入 Excel 工作簿?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/7570668/

24 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com