我正在寻找一种使用VBA代码从外部数据库文件中删除VBA模块的方法。名为“ myfile.accdb”的外部文件具有名为“ mod1”的模块,我希望能够在单独的项目中使用VBA代码删除该模块。
像这样的东西:
OpenDatabase(“ myfile.accdb”)。Modules(“ mod1”)。Delete
由于我找不到自己的东西,也没有写自己的东西,所以非常感谢工作代码。
此代码将删除代码模块。
Sub DeleteThisModule()
Dim vbCom As Object
MsgBox "Hi, I will delete myself "
Set vbCom = Application.VBE.ActiveVBProject.VBComponents
vbCom.Remove VBComponent:= _
vbCom.Item("Module1")
End Sub
因此,您需要对Visual Basic for Applications扩展性的引用,并且还需要信任对VB编辑器的访问
因此,上面的代码将帮助您入门,但是,您需要将外部文件作为应用程序引用
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句