MS Access使用VBA从访问文件中删除模块

Question

我正在寻找一种方法来使用VBA代码从外部数据库文件中删除VBA模块。 名为“myfile.accdb”的外部文件有一个名为“mod1”的模块我希望能够在单独的项目中使用VBA代码删除该模块。

是这样的：
的openDatabase（“myfile.accdb”）模块（“MOD1”）删除

工作的代码将非常赞赏，因为我没能找到任何我自己和失败的。写我自己的。

Answer 1

从Ozgrid.com - How to delete a code module

该代码将删除一个代码模块。

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中参考应用程序扩展，你也需要信托进入VB编辑

所以上面的代码将让你开始，但是，你需要引用外部文件作为应用程序