VBA Tips - Deletando um Módulo após rodar o código nele - Delete Module After Running VBA Code

Inline image 1

Este código abaixo pode ser utilizada para eliminar um módulo que abriga um código. Em outras palavras, ele se apaga depois de executado uma vez.
Sub DeleteThisModule()
    Dim vbCom As Object
    MsgBox "Olá, estou deletando a mim mesmo. "
    Set vbCom = Application.VBE.ActiveVBProject.VBComponents
    vbCom.Remove VBComponent:= vbCom.Item("Module1")
End Sub

Reference

Tags: VBA, Excel, module, delete, code


Inline image 1

Nenhum comentário:

Postar um comentário

diHITT - Notícias