Exclua o conteúdo do módulo usando VBA no Microsoft Excel

Anonim

Não é possível deletar todos os tipos de módulos, você não pode deletar os codemódulos das planilhas,
gráficos e ThisWorkbook. Nestes módulos, você deve excluir o conteúdo em vez do próprio módulo:

Sub DeleteModuleContent (ByVal wb As Workbook, _ ByVal DeleteModuleName As String) 'exclui o conteúdo de DeleteModuleName em wb' use isto se você não puder excluir o módulo On Error Resume Next With wb.VBProject.VBComponents (DeleteModuleName) .CodeModule .DeleteLines 1, .CountOfLines End With On Error GoTo 0 End Sub

Exemplo:

DeleteModuleContent ActiveWorkbook, "Planilha1"