excel - 从 Excel 文件中删除所有 VBA 模块？

Question

是否可以使用 VBA 从 Excel 文件中删除所有 VBA 模块？

在运行此脚本之前，模块的名称(如果存在)是未知的。

Answer 1

显然，你可以。以下代码将完成这项工作:

Sub compact_code()

On Error Resume Next
    Dim Element As Object
    For Each Element In ActiveWorkbook.VBProject.VBComponents
        ActiveWorkbook.VBProject.VBComponents.Remove Element
    Next

End Sub

这将删除所有模块，包括 ClassModules 和 UserForms，但保留所有对象模块(工作表、工作簿)。