Module-inhoud verwijderen met VBA in Microsoft Excel

Het is niet mogelijk om alle soorten modules te verwijderen, je kunt de codemodules voor werkbladen niet verwijderen,
grafieken en ThisWorkbook. In deze modules moet je de inhoud verwijderen in plaats van de module zelf:

Sub DeleteModuleContent (ByVal wb As Workbook, _ ByVal DeleteModuleName As String) ' verwijdert de inhoud van DeleteModuleName in wb ' gebruik dit als u de module niet kunt verwijderen On Error Resume Next With wb.VBProject.VBComponents (DeleteModuleName).CodeModule .DeleteLines 1, .CountOfLines eindigen met bij fout GoTo 0 End Sub

Voorbeeld:

DeleteModuleContent ActiveWorkbook, "Blad1"