Bem estou escrevendo este post de excluindo modulo junto com “Inserindo Modulo em Outra Planilha” (link no final do artigo), pois creio que você pode usar um complementando com o outro.
Lembrando que ao excluir o módulo e Salvar…já era, não tem como voltar!.
Abaixo segue o código, a idéia é simples: eu abro uma planilha existente e excluo o módulo que já conheço (“Mod1”).
Tentei deixar o mais simples possível e assim ficar fácil o entendimento, e portanto não coloquei para Salvar após inserir o módulo ou Paralisar a tela antes de executar.
* Para o código abaixo funcionar é necessário habilitar opção de confiança de objetos VBA
* Também é necessário adicionar na biblioteca a referencia Extensibility, dúvida ver o vídeo abaixo
Codigo Excluindo modulo
_________________________________________________________________________
Sub EXCLUIR_MODULO_EXCELEVBA_COM_BR()
'Para esse código funcionar é necessário adicionar a referencia de Extensibility
Dim moduloAntigo As VBComponent
endereco = "c:\temp\codigoAntigo.xlsm"
Workbooks.Open (endereco)
'Mod1 é o nome do módulo que quero excluir que já existe na panilha codigoAntigo.xlsm
On Error Resume Next
Set moduloAntigo = ActiveWorkbook.VBProject.VBComponents("Mod1")
ActiveWorkbook.VBProject.VBComponents.Remove moduloAntigo
Set moduloAntigo = Nothing
DoEvents
End Sub
_____________________________________________________________________________
Segue abaixo o vídeo demonstrativo
Veja Também:
Inserindo um módulo em outra Planilha