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

Excluindo modulo

* 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