V tomto článku vytvoríme makro na odstránenie modulu zo zošita.
Ako nespracovaný modul budeme používať modul MainModule.
Chceme sa zbaviť tohto MainModule.
To isté urobíte aj kliknutím na toto tlačidlo.
Logické vysvetlenie
V tomto článku sme vytvorili dve makrá, DeleteVBComponent a calling_procedure.
Odstrániť VBComponent
Ako vstupy vezme názov zošita a názov modulu a modul zo zošita odstráni.
calling_procedure
Používa sa na volanie makra DeleteVBComponent s aktívnym zošitom a vstupmi MainModule.
Vysvetlenie kódu
Application.DisplayAlerts = False
Tento kód sa používa na deaktiváciu výstražnej správy.
wb.VBProject.VBComponents.Remove wb.VBProject.VBComponents (CompName)
Tento kód sa používa na odstránenie modulu zo zošita.
Application.DisplayAlerts = Pravda
Tento kód sa používa na povolenie výstražnej správy.
Pri kódovaní postupujte podľa nižšie uvedených pokynov
Možnosť Explicitná čiastková položka DeleteVBComponent (ByVal wb ako zošit, ByVal CompName ako reťazec) „Vypnutie výstražnej správy Application.DisplayAlerts = False„ Ignorovať chyby pri chybe Pokračovať ďalej “Odstrániť komponent wb.VBProject.VBComponents.Remove wb.VBProject.VBComponents (CompName ) On Error GoTo 0 'Povolenie výstražnej správy Application.DisplayAlerts = Sub Sub Sub True calling calling_procedure ()' Calling DeleteVBComponent macro DeleteVBComponent ActiveWorkbook, "MainModule" End Sub
Ak sa vám tento blog páčil, zdieľajte ho so svojimi priateľmi na Facebooku. Môžete nás tiež sledovať na Twitteri a Facebooku.
Budeme radi, ak sa nám ozvete, dajte nám vedieť, ako môžeme zlepšiť našu prácu a zlepšiť ju pre vás. Napíšte nám na emailovú stránku