如何使用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. 项目应该解锁。