如何使用VBA宏重命名模块？

Question

我在表格上放了一个按钮。我想为该按钮分配宏来更改模块名称。

例如有两个名为Module1和Module2的模块。所以我想将上述两个模块的模块名称相互替换。任何人都可以建议我如何使用宏重命名模块？

Answer 1

你可以编程 Visual Basic编辑器（VBE）（实际上很有趣我刚才回答this）。
看看它是如何添加引用的 VBA可扩展性库。
一旦您正确设置了所需的参考，以下类似的内容就适用于您：

Dim VBProj As VBIDE.VBProject, wb as Workbook
Set wb = ThisWorkbook
Set VBProj = wb.VBProject
VBProj.VBComponents("Module1").Name = "Module2"

重要：

1. 添加对 VBA可扩展性库的引用

     

   Microsoft Visual Basic for Applications Extensibility 5.3

2. 在开发人员宏设置下勾选信任访问VBA项目对象模型。
3. 项目应该解锁。