ms-access - MS Access 使用 VBA 从 Access 文件中删除模块

Question

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

类似这样的:
OpenDatabase("myfile.accdb").Modules("mod1").Delete

工作代码将非常感激，因为我未能找到自己的代码，也未能编写自己的代码。

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 For Applications Extensibility，并且还需要信任对 VB 编辑器的 Access

因此上面的代码将帮助您开始，但是，您需要引用外部文件作为应用程序