V tem članku bomo ustvarili makro za brisanje modula iz delovnega zvezka.
MainModule bomo uporabljali kot surov modul.
Znebiti se želimo tega glavnega modula.
Za isti klik na ta gumb.
Logična razlaga
V tem članku smo ustvarili dva makra, DeleteVBComponent in call_procedure.
Izbriši komponento VBComponent
Za vnos vzame ime delovnega zvezka in ime modula ter modul iz delovnega zvezka izbriše.
klicni_procedure
Uporablja se za klicanje makra DeleteVBComponent z aktivnim delovnim zvezkom in MainModule kot vhodi.
Razlaga kode
Application.DisplayAlerts = Napačno
Ta koda se uporablja za onemogočanje opozorilnega sporočila.
wb.VBProject.VBComponents.Odstranite wb.VBProject.VBComponents (CompName)
Ta koda se uporablja za odstranitev modula iz delovnega zvezka.
Application.DisplayAlerts = Res
Ta koda se uporablja za omogočanje opozorilnega sporočila.
Za kodo sledite spodaj
Možnost Eksplicitno sub brisanjeVBComponent (ByVal wb kot delovni zvezek, ByVal CompName kot niz) "Onemogočanje opozorilnega sporočila Application.DisplayAlerts = False" Prezri napake pri nadaljevanju napake Naprej "Izbrišite komponento wb.VBProject.VBComponents.Remove wb.VBProject.BC ) On Error GoTo 0 'Omogočanje opozorilnega sporočila Application.DisplayAlerts = True End Sub Sub call_procedure ()' Calling DeleteVBComponent macro Mac DeleteVBComponent ActiveWorkbook, "MainModule" End Sub
Če vam je bil ta blog všeč, ga delite s prijatelji na Facebooku. Prav tako nam lahko sledite na Twitterju in Facebooku.
Radi bi slišali od vas, nam sporočite, kako lahko izboljšamo svoje delo in ga izboljšamo za vas. Pišite nam na spletnem mestu e -pošte