Preskoči na glavno vsebino

Kako odstraniti makre iz Excela (Celoten vodnik)

Microsoft Excel ponuja zmogljivo funkcijo v obliki makrov, ki lahko avtomatizirajo ponavljajoča se opravila in izvedejo številne operacije, ki jih vgrajene Excelove funkcije ne morejo doseči. Vendar pa obstajajo primeri, ko lahko ti makri postanejo odvečni ali celo predstavljajo morebitna varnostna tveganja, zlasti pri skupni rabi vašega delovnega zvezka z drugimi. V teh trenutkih postane razumevanje, kako varno in učinkovito odstraniti makre, bistveno. Ta vodnik je zasnovan tako, da vas popelje skozi različne metode odstranjevanja makrov iz vaših Excelovih delovnih zvezkov, kar zagotavlja, da imate čisto in poenostavljeno datoteko, ko jo potrebujete.


Kaj morate vedeti, preden odstranite makre v Excelu

  • Ko odprete delovni zvezek z omogočenimi makri in poskušate odstraniti makre, morate najprej klikniti Omogoči vsebino gumb v vašem delovnem zvezku. To je potrebno, preden jih lahko izbrišete.
  • Opomba: Če tega gumba ne vidite, je zelena luč, da nadaljujete in izbrišete makre. Razlog za njegovo odsotnost je lahko, če ste sami ustvarili delovni zvezek z vdelanimi makri in ga shranili. Ko ponovno odprete ta delovni zvezek v istem računalniku in z nespremenjenimi nastavitvami programa Excel, se Omogoči vsebino gumb se pogosto ne prikaže. To je zato, ker datoteka izvira iz zaupanja vrednega vira (vas) in se nahaja na zaupanja vrednem mestu (vaš računalnik).

  • Ne pozabite, da po odstranitvi makra obnovitev ni več mogoča. Če želite zaščititi svoje delo, je priporočljivo ustvariti varnostno kopijo delovnega zvezka, preden izbrišete makre.

Odstranite določen makro

1. korak: Odprite pogovorno okno Makro

Pomaknite se na Razvojni Kartico in izberite Makri da odprete Makro pogovorno okno. (Če Razvojni ni viden v vašem Excelu, glejte opombo za koraki.)

Nasvet:
  • Če uporabljate Excel 2013 ali novejšo različico, se Makri gumb najdete tudi znotraj Poglej tab.
  • Ljubitelji bližnjic lahko neposredno pritisnejo Alt + F8 za dostop do Makro pogovorno okno.

2. korak: izberite in izbrišite določen makro

  1. Razširi "Makri v" spustnem meniju in izberite želeni cilj, od koder želite odstraniti makre.
  2. Na seznamu makrov izberite tistega, ki ga želite odstraniti.
  3. klik Brisanje.

Opombe:

  • Če želite dodati Razvojni na trak v Excelu naredite naslednje:
    1. Z desno tipko miške kliknite kjer koli na traku in izberite Prilagodite trak ....
    2. Na seznamu Glavne zavihke na desni strani okna, ki se prikaže, potrdite polje poleg Razvojni in kliknite OK.
  • Če nameravate odstraniti več makrov, boste morali zgornji postopek ponoviti za vsak posamezni makro. Za navodila o paketnem brisanju vseh makrov nadaljujte z naslednjimi razdelki.

Izbrišite vse makre iz delovnega zvezka

V primerih, ko morate iz delovnega zvezka odstraniti vse makre, obstajata dva načina:


Izbrišite vse makre iz delovnega zvezka tako, da shranite datoteko v formatu xlsx

Format »Excel Workbook (*.xlsx)« sam po sebi nima podpore za makre. Shranjevanje delovnega zvezka v tej posebni obliki bo povzročilo samodejno odstranitev vseh vdelanih makrov. Če želite izvesti to metodo, nadaljujte tako:

  1. Pomaknite se na file > Shrani kot.
  2. Razširite spustni meni vrste datoteke in izberite "Excelov delovni zvezek (* .xlsx)" format.
  3. Nasvet: V besedilno polje nad spustnim menijem lahko vnesete novo ime za datoteko .xlsx. Če želite datoteko shraniti na drugo mesto, kliknite Brskanje.
  4. klik Shrani.
  5. Opomba: O Shrani kot vmesnik se lahko razlikuje v različnih različicah Excela. Če ne opazite desnega podokna, kot je prikazano zgoraj, kjer je na voljo izbira oblike datoteke, lahko vedno kliknete Brskanje in nato izberite obliko »Excel Workbook (*.xlsx)«.

  6. V oknu za poziv, ki se prikaže, izberite Da.

Rezultat

Posledično se shrani nova datoteka v formatu ".xlsx" brez makrov. Ta datoteka .xlsx bo prevzela ime izvirne datoteke .xlsm in bo shranjena na istem mestu.

Opomba: Ta metoda ne izloči uporabniških obrazcev, pogovornih listov programa Excel 5/95 in podobnih elementov. Če jih želite odpraviti, si oglejte naslednjo metodo.


Izbrišite vse makre iz delovnega zvezka z možnostjo enega klika, ki jo ponuja Kutools

Kutools za Excel, napredni dodatek za Excel, uporabnikom ponuja možnost, da z enim klikom brez težav izbrišejo vse makre, vdelane v delovni zvezek. Z enim klikom lahko počistite module VBA, uporabniške obrazce, pogovorne liste Excel 5/95 in delovne liste makrov Excel 4 XLM.

Ko odprete delovni zvezek, ki vsebuje makre, ki jih želite izbrisati, se pomaknite do Kutools zavihek in izberite Brisanje > Odstrani vse makre. In voilà, končali ste!

Opomba: Želite dostopati do te funkcije? Prenesi Kutools za Excel zdaj! Poleg tega se Kutools ponaša z nešteto 300+ drugimi funkcijami in ponuja 30-dnevno preskusno različico. Ne čakajte, poskusite še danes!


Izbrišite vse makre iz več delovnih zvezkov

Ko se soočite z nalogo odstranjevanja makrov iz več delovnih zvezkov, lahko uporabite dva pristopa:


Odstranite vse makre iz delovnih zvezkov v mapi z VBA

V tem razdelku bom prikazal, kako učinkovito odstraniti makre iz vseh delovnih zvezkov v določeni mapi z uporabo makra VBA.

Opomba: Preden odstranite makre z makrom VBA, morate:
  • Pomaknite se na file > možnosti > Trust Center > Trust Center Nastavitve > Nastavitve makrov, nato izberite "Zaupajte dostop do objektnega modela projekta VBA".
  • Prepričajte se, da med izvajanjem tega VBA ni odprt noben delovni zvezek v določeni mapi. Če ga izvajate z odprtimi delovnimi zvezki, lahko pride do napak.

1. korak: Ustvarite nov modul

  1. Pritisnite Alt + F11 da odprete Visual Basic za aplikacije (VBA) urednik.
  2. klik Vstavi > Moduli da ustvarite nov modul.

2. korak: Kopirajte kodo VBA v okno modula

Kopirajte spodnjo kodo VBA in jo prilepite v odprto Moduli okno.

Sub RemoveMacrosFromWorkbooks()
' Update by ExtendOffice

    Dim wb As Workbook
    Dim FolderPath As String
    Dim filename As String
    Dim VBComp As Object
    Dim VBProj As Object

    With Application.FileDialog(msoFileDialogFolderPicker)
        .title = "Select a folder"
        .Show
        If .SelectedItems.Count = 0 Then
            MsgBox "No folder selected. The procedure will exit.", vbExclamation
            Exit Sub
        End If
        FolderPath = .SelectedItems(1)
    End With

    If Right(FolderPath, 1) <> "\" Then FolderPath = FolderPath + "\"

    filename = Dir(FolderPath & "*.xls*")
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    On Error Resume Next
    Do While filename <> ""
        Set wb = Workbooks.Open(FolderPath & filename)

        If wb.HasVBProject Then
            Set VBProj = wb.VBProject
            
            For Each VBComp In VBProj.VBComponents
                VBProj.VBComponents.Remove VBComp
            Next VBComp
        End If

        wb.Close SaveChanges:=True

        filename = Dir
    Loop
    Application.ScreenUpdating = True
    Application.DisplayAlerts = True
    MsgBox "Macros removal completed!", vbInformation

End Sub

3. korak: Zaženite kodo VBA

  1. v Moduli okno, pritisnite F5 ali kliknite na gumb za izvedbo prilepljene kode.
  2. v Izberite mapo okno, ki se prikaže, izberite mapo z delovnimi zvezki, iz katerih boste odstranili makre, in kliknite OK.

Rezultat

Ko bo makro končal obdelavo vseh Excelovih datotek v izbrani mapi in odstranil makre iz njih, boste videli "Odstranjevanje makrov končano!" polje za sporočila.

Opombe:

  • Ta metoda ne izloči uporabniških obrazcev, pogovornih listov programa Excel 5/95 in podobnih elementov. Če jih želite odpraviti, si oglejte naslednjo metodo.
  • Aktiviranje možnosti zaupanja vrednega dostopa do objektnega modela projekta VBA lahko predstavlja varnostno tveganje. Priporočljivo je, da možnost omogočite samo med izvajanjem te kode. Prepričajte se, da ste preklicali izbiro "Zaupajte dostop do objektnega modela projekta VBA", ko koda zaključi svojo izvedbo.

Odstranite vse makre iz vseh določenih delovnih zvezkov s programom Kutools

Kutools za Excel ponuja uporabniku prijazen način za odstranitev vseh makrov iz več delovnih zvezkov. Za tiste, ki oklevajo ali ne poznajo tehnik VBA, je Kutools idealna alternativa. S tem orodjem, ki vam je na voljo, lahko module VBA, uporabniške obrazce, pogovorne liste Excel 5/95 in delovne liste makrov Excel 4 XLM brez težav odstranite.

Opomba: Če želite zagnati to funkcijo, morate zaupati dostopu do objektnega modela projekta VBA. V Excelu pojdite na file > možnosti > Trust Center > Trust Center Nastavitve > Nastavitve makrov, nato izberite "Zaupajte dostop do objektnega modela projekta VBA".

po prenos in namestitev Kutools for Excel, nadaljujte z naslednjimi koraki:

  1. Izberite Kutools > Brisanje > Paket Odstrani vse makre.
  2. v Paket Odstrani vse makre pogovornem oknu, ki se prikaže, so vsi odprti delovni zvezki navedeni za odstranitev makra. Tukaj je tisto, kar morate storiti:
    1. Če želite dodati več delovnih zvezkov za odstranitev makrov, kliknite Dodaj in izberite eno od možnosti file or Mapa.
    2. Če obstajajo delovni zvezki, ki jih želite izključiti iz postopka odstranjevanja makra, kliknite , da jih odstranite.
    3. Ko v pogovornem oknu navedete vse želene delovne zvezke za odstranitev makrov, kliknite OK.

Rezultat

Prikaže se novo pogovorno okno, ki prikazuje, koliko delovnih zvezkov je Kutools obdelal za odstranitev makrov. Po pritisku OK, bo ustvarjen avtomatiziran delovni zvezek s povzetkom, v katerem bodo prikazani rezultati.

Opombe:

  • Želite dostopati do te funkcije? Prenesi Kutools za Excel zdaj! Poleg tega Kutools ponuja več kot 300 drugih funkcij. S 30-dnevnim brezplačnim preizkusom ni razloga za čakanje. Preizkusite še danes!
  • Aktiviranje možnosti zaupanja vrednega dostopa do objektnega modela projekta VBA lahko predstavlja varnostno tveganje. Priporočljivo je, da možnost omogočite samo med izvajanjem funkcije. Prepričajte se, da ste preklicali izbiro "Zaupajte dostop do objektnega modela projekta VBA", ko funkcija zaključi svojo izvedbo.

Zgoraj je vsa ustrezna vsebina, povezana z odstranjevanjem makrov v Excelu. Upam, da vam bo vadnica v pomoč. Če želite raziskati več nasvetov in trikov za Excel, kliknite tukaj za dostop do naše obsežne zbirke več kot tisoč vadnic.

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations