【VBA】模块更新方法

删除模块，重新导入

Sub 更新模块()
    With ThisWorkbook.VBProject
         .VBComponents.Remove .VBComponents("模块1") '删除模块
         .VBComponents.Import ("C:	emp模块1.bas")  '导入模块
    End With
End Sub