În acest articol vom crea o macro pentru a șterge modulul din registrul de lucru.
Vom folosi MainModule ca modul brut.
Vrem să scăpăm de acest MainModule.
Faceți clic pe acest buton pentru același lucru.
Explicație logică
În acest articol, am creat două macrocomenzi, DeleteVBComponent și calling_procedure.
DeleteVBComponent
Prinde numele registrului de lucru și numele modulului ca intrări și șterge modulul din registrul de lucru.
apelare_procedură
Se folosește pentru a apela macrocomanda DeleteVBComponent cu registrul de lucru activ și MainModule ca intrări.
Explicarea codului
Application.DisplayAlerts = Fals
Acest cod este utilizat pentru a dezactiva mesajul de alertă.
wb.VBProject.VBComponents.Remove wb.VBProject.VBComponents (CompName)
Acest cod este utilizat pentru a elimina modulul din registrul de lucru.
Application.DisplayAlerts = Adevărat
Acest cod este utilizat pentru a activa mesajul de alertă.
Vă rugăm să urmați codul de mai jos
Option Explicit Sub DeleteVBComponent (ByVal wb As Workbook, ByVal CompName As String) 'Dezactivarea mesajului de alertă Application.DisplayAlerts = False' Ignorare erori la eroare Reîncepeți Următorul 'Ștergeți componenta wb.VBProject.VBComponents.Remove wb.VBProject.VBComponents (CompName) ) On Error GoTo 0 'Activarea mesajului de alertă Application.DisplayAlerts = True End Sub Sub calling_procedure ()' Apelare DeleteVBComponent macro DeleteVBComponent ActiveWorkbook, "MainModule" End Sub
Dacă ți-a plăcut acest blog, distribuie-l prietenilor tăi de pe Facebook. De asemenea, ne puteți urmări pe Twitter și Facebook.
Ne-ar plăcea să aflăm de la dvs., să ne anunțați cum putem îmbunătăți munca noastră și o putem îmbunătăți. Scrieți-ne pe site-ul de e-mail