Jak odstranit makra z Excelu (úplný průvodce)
Microsoft Excel nabízí výkonnou funkci ve formě maker, která dokážou automatizovat opakující se úkoly a provádět mnoho operací, které vestavěné funkce Excelu nemohou dosáhnout. Existují však případy, kdy se tato makra mohou stát nadbytečnými nebo dokonce představovat potenciální bezpečnostní rizika, zejména při sdílení sešitu s ostatními. V těchto chvílích je nezbytné pochopit, jak bezpečně a efektivně odstranit makra. Tato příručka je vytvořena tak, aby vás provedla různými metodami odstraňování maker z vašich excelových sešitů a zajistila, že budete mít v případě potřeby čistý a zjednodušený soubor.
Co byste měli vědět před odebráním maker v Excelu
- Při otevírání sešitu s povolenými makry a pokusu o odebrání maker musíte nejprve klepnout na ikonu Povolit obsah tlačítko ve vašem sešitu. To je nezbytné, než budete moci pokračovat v jejich odstranění.
-
Poznámka: Pokud toto tlačítko nevidíte, máte zelenou, abyste mohli makra smazat. Důvodem jeho absence může být, že jste si sami vytvořili sešit s vloženými makry a uložili jej. Při opětovném otevření tohoto sešitu na stejném počítači a s nezměněným nastavením Excelu se Povolit obsah tlačítko se často nezobrazuje. Je to proto, že soubor pochází z důvěryhodného zdroje (vy) a je umístěn v důvěryhodném umístění (váš počítač).
- Pamatujte, že jakmile je makro odstraněno, obnovení není možné. Chcete-li chránit svou práci, je vhodné před odstraněním maker vytvořit záložní kopii sešitu.
Odeberte konkrétní makro
Krok 1: Otevřete dialogové okno Makro
Přejděte na Vývojka Kartu a vyberte makra k otevření Makro dialogové okno. (Pokud Vývojka karta není ve vašem Excelu viditelná, viz poznámka po krocích.)
- Pokud používáte Excel 2013 nebo novější verzi, makra tlačítko lze také nalézt v Pohled Karta.
- Milovníci zkratek mohou přímo stisknout Alt + F8 pro přístup k Makro dialogové okno.
Krok 2: Vyberte a odstraňte konkrétní makro
- Rozbalte "Makra v" rozevírací nabídce a vyberte požadovaný cíl, odkud chcete makra odebrat.
- Ze seznamu maker vyberte to, které chcete odstranit.
- klikněte Vymazat.
Poznámky:
- Chcete-li přidat Vývojka přejděte na pás karet v Excelu, postupujte takto:
- Klikněte pravým tlačítkem kamkoli na pás karet a vyberte Přizpůsobte si pásku….
- V seznamu Hlavní záložky na pravé straně okna, které se objeví, zaškrtněte políčko vedle Vývojka a klepněte na tlačítko OK.
- Pokud máte v úmyslu odstranit více maker, budete muset výše uvedený proces zopakovat pro každé jednotlivé makro. Pokyny k hromadnému odstranění všech maker naleznete v následujících částech.
Odstraňte všechna makra ze sešitu
V případech, kdy potřebujete ze sešitu odebrat všechna makra, existují dva způsoby:
Odstraňte všechna makra ze sešitu uložením souboru ve formátu xlsx
Formát "Sešit Excelu (*.xlsx)" ze své podstaty postrádá podporu maker. Uložení sešitu v tomto specifickém formátu tedy způsobí automatické odstranění všech vložených maker. Chcete-li provést tuto metodu, postupujte následovně:
- přejděte na Soubor > Uložit jako.
- Rozbalte rozevírací nabídku typu souboru a vyberte možnost "Sešit aplikace Excel (* .xlsx)" formát.
-
Tip: Do textového pole nad rozbalovací nabídkou můžete zadat nový název souboru .xlsx. Chcete-li soubor uložit do jiného umístění, klepněte na Procházet.
- klikněte Uložit.
-
Poznámka: Projekt Uložit jako rozhraní se může v různých verzích Excelu lišit. Pokud si nevšimnete pravého podokna, jak je znázorněno výše, kde je k dispozici výběr formátu souboru, můžete vždy kliknout Procházet a poté zvolte formát "Sešit Excel (*.xlsx)".
- V okně výzvy, které se zobrazí, vyberte Ano.
Výsledek
Výsledkem je uložení nového souboru ve formátu „.xlsx“ bez maker. Tento soubor .xlsx převezme název původního souboru .xlsm a bude uložen na stejném místě.
Poznámka: Tato metoda nevyjme UserForms, dialogové listy aplikace Excel 5/95 a podobné prvky. Pokud se je snažíte odstranit, podívejte se prosím na další metodu.
Odstraňte všechna makra ze sešitu pomocí možnosti jednoho kliknutí, kterou poskytuje Kutools
Kutools pro Excel, pokročilý doplněk aplikace Excel, poskytuje uživatelům možnost jedním kliknutím snadno odstranit všechna makra vložená v sešitu. Jediným kliknutím můžete vymazat moduly VBA, UserForms, dialogové listy Excel 5/95 a listy maker Excel 4 XLM.
Jakmile otevřete sešit obsahující makra, která chcete odstranit, přejděte na Kutools Záložka a zvolte Vymazat > Odebrat všechna makra. A voilà, máte hotovo!
Poznámka: Chcete získat přístup k této funkci? Stažení Kutools pro Excel Nyní! Kromě toho se Kutools může pochlubit nesčetným množstvím více než 300 dalších funkcí a nabízí 30denní zkušební verzi. Nečekejte a vyzkoušejte to ještě dnes!
Odstraňte všechna makra z více sešitů
Když stojíte před úkolem odstranit makra z několika sešitů, můžete zvolit dva přístupy:
Odeberte všechna makra ze sešitů ve složce s VBA
V této části předvedu, jak efektivně odstranit makra ze všech sešitů v určené složce pomocí makra VBA.
- přejděte na Soubor > možnosti > Centrum zabezpečení > Nastavení centra důvěryhodnosti > Nastavení makraa poté vyberte „Důvěřujte přístupu k objektovému modelu projektu VBA"možnost.
- Ujistěte se, že při provádění tohoto VBA nejsou otevřeny žádné sešity v určené složce. Spuštění s otevřenými sešity může vést k chybám.
Krok 1: Vytvořte nový modul
- Stisknout Alt + F11 k otevření Visual Basic for Applications (VBA) editor.
- klikněte Vložit > Modul pro vytvoření nového modulu.
Krok 2: Zkopírujte kód VBA do okna modulu
Zkopírujte níže uvedený kód VBA a vložte jej do otevřeného Modul 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
Krok 3: Spusťte kód VBA
- v Modul okno, stiskněte F5 nebo klikněte na tlačítko tlačítko pro provedení vloženého kódu.
- v Vyberte složku V okně, které se objeví, vyberte složku obsahující sešity, ze kterých chcete makra odebrat, a klepněte na OK.
Výsledek
Poté, co makro dokončí zpracování všech souborů Excel ve vybrané složce a odstranění maker z nich, zobrazí se "Odstranění maker dokončeno!“ schránka zpráv.
Poznámky:
- Tato metoda nevyjme UserForms, dialogové listy aplikace Excel 5/95 a podobné prvky. Pokud se je snažíte odstranit, podívejte se prosím na další metodu.
- Aktivace možnosti Důvěřovat přístupu k možnosti objektového modelu projektu VBA může představovat bezpečnostní riziko. Doporučuje se povolit tuto možnost pouze při spuštění tohoto kódu. Ujistěte se, že jste zrušili výběr "Důvěřujte přístupu k objektovému modelu projektu VBA", jakmile kód dokončí své provádění.
Odstraňte všechna makra ze všech konkrétních sešitů pomocí Kutools
Kutools pro Excel poskytuje uživatelsky přívětivý způsob odstranění všech maker z více sešitů. Pro ty, kteří váhají nebo neznají techniky VBA, slouží Kutools jako ideální alternativa. S tímto nástrojem, který máte k dispozici, lze bez námahy odstranit moduly VBA, UserForms, dialogové listy Excel 5/95 a listy maker Excel 4 XLM.
Poznámka: Chcete-li tuto funkci spustit, musíte důvěřovat přístupu k objektovému modelu projektu VBA. V Excelu přejděte na Soubor > možnosti > Centrum zabezpečení > Nastavení centra důvěryhodnosti > Nastavení makraa poté vyberte „Důvěřujte přístupu k objektovému modelu projektu VBA"možnost.
Po stažení a instalace Kutools pro Excel, pokračujte podle následujících kroků:
- vybrat Kutools > Vymazat > Dávkové odebrání všech maker.
- v Dávkové odebrání všech maker V dialogovém okně, které se zobrazí, jsou uvedeny všechny otevřené sešity pro odstranění makra. Dále je třeba provést následující:
- Chcete-li přidat další sešity pro odstranění makra, klikněte na přidat a vyberte buď Soubor or Desky.
- Pokud existují nějaké sešity, které chcete vyloučit z procesu odebrání makra, klikněte na tlačítko k jejich odstranění.
- Jakmile v dialogovém okně vypíšete všechny požadované sešity pro odebrání makra, klepněte na OK.
Výsledek
Zobrazí se nové dialogové okno, které uvádí, kolik sešitů Kutools zpracoval pro odstranění makra. Po stisknutí OK, bude vygenerován automatický souhrnný sešit, ve kterém budou shrnuty výsledky.
Poznámky:
- Chcete získat přístup k této funkci? Stažení Kutools pro Excel Nyní! Kromě toho nabízí Kutools více než 300 dalších funkcí. Díky 30denní bezplatné zkušební verzi není důvod čekat. Zkuste to ještě dnes!
- Aktivace možnosti Důvěřovat přístupu k možnosti objektového modelu projektu VBA může představovat bezpečnostní riziko. Doporučuje se povolit tuto možnost pouze při spuštění funkce. Ujistěte se, že jste zrušili výběr "Důvěřujte přístupu k objektovému modelu projektu VBA", jakmile funkce dokončí své provádění.
Nahoře je veškerý relevantní obsah související s odstraňováním maker v Excelu. Doufám, že vám bude návod užitečný. Pokud chcete prozkoumat další tipy a triky pro Excel, prosím klikněte zde pro přístup k naší rozsáhlé sbírce více než tisíců výukových programů.
Související články
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
Obsah
- Co byste měli vědět před odebráním maker v Excelu
- Odeberte konkrétní makro
- Odstraňte všechna makra ze sešitu
- Uložením souboru ve formátu xlsx
- S možností jednoho kliknutí, kterou poskytuje Kutools
- Odeberte všechna makra z více sešitů
- Odstraňte makra ze sešitů ve složce pomocí VBA
- Odstraňte makra ze všech konkrétních sešitů pomocí Kutools
- Související články
- Nejlepší kancelářské nástroje produktivity
- Komentáře