Příklady: Obsah | 8 Záznam maker

8.2 Nastavení prostředí, automatická makra

Makra vytvořená pomocí záznamu ne vždy zcela vyhovují našim představám. Lze je dále upravovat v prostředí editoru jazyka Visual Basic for Applications. Tento příklad je věnován nastavení zabezpečení maker, seznámení s prostředím editoru a ukázce práce s automatickými makry.

Zadání

Otevřete dokument MakroAuto.docm. Dále postupujte následujícím způsobem:

  1. Aktivujte kartu Vývojář pro práci s makry (pokud není zobrazena). Řešení
  2. Nastavte prostředí Wordu pro snadný přístup k makrům v dokumentu a pro zápis algoritmu v prostředí Editoru jazyka Visual Basic. Řešení
  3. Seznamte se s prostředím Editoru jazyka Visual Basic. Řešení
  4. Spusťte makro Logo jak v prostředí Wordu, tak v prostředí editoru jazyka Visual Basic. Řešení
  5. Spusťte makro Logo krokováním. Řešení
  6. Makro Logo změňte na automatické makro, které se bude spouštět automaticky po otevření dokumentu MakroAuto.docm. Řešení
  7. Uložte změny v makru, zavřete dokument a makro vyzkoušejte. Řešení

Řešení

Otevřít dokument MakroAuto.docm obvyklým způsobem (viz např. příklad 1.3 Práce s existujícím dokumentem). Při výchozím nastavení zabezpečení Wordu se v horní části okna zobrazí lišta s upozorněním, že bylo zakázáno spouštění maker. Pokud chceme s makrem pracovat, musíme povolit práci s makry tlačítkem Možnosti…/Povolit obsah.

  1. Zobrazit kartu Vývojář (pokud ještě není zobrazena) - karta Soubor/položka Možnosti/Přizpůsobit pás karet, v pravé části okna zatrhnout položku Vývojář. Zadání
  2. Karta Vývojář/skupina Kód/příkaz Zabezpečení maker (nebo karta Soubor/položka Možnosti/Centrum zabezpečení/tlačítko Nastavení centra zabezpečení…/Nastavení maker). Prohlédněte si možnosti Nastavení maker, nastavte pro tento příklad Povolit všechna makra. Uzavřete a znovu otevřete dokument (po tomto nastavení je třeba restartovat aplikaci Word). Nyní se již upozornění na spouštění maker nezobrazí. Pozn. Toto nastavení použijte pouze pro tento příklad, z hlediska bezpečnosti se doporučuje nechat implicitní nastavení maker - Zakázat všechna makra s oznámením. Zadání
  3. Karta Vývojář/skupina Kód/příkaz Visual Basic. Spustí se aplikace Editor jazyka Visual Basic. V levé části je zobrazeno okno Project (okno projektů), ve kterém se nacházejí všechny projekty. Každý otevřený dokument má vytvořen svůj vlastní projekt (včetně šablony Normal.dotm). Každý projekt obsahuje objekty Wordu (Microsoft Word Objects) – např. objekt ThisDocument (dokument), moduly (Modules) – ve kterých se nacházejí makra, formuláře (Forms), odkazy na jiné soubory nebo šablony (References) a další. Pokud není okno projektů zobrazeno, lze jej zobrazit pomocí nabídky View/Project Explorer. Zadání
  4. Spuštění makra v prostředí Wordu: Zadání
    1. V dokumentu umístit kurzor libovolně v textu.
    2. Karta Vývojář/skupina Kód/příkaz Makra, otevře se dialogové okno Makra.
    3. V poli Název makra vybrat Logo.
    4. Tlačítko Spustit.

    Spuštění makra v prostředí editoru jazyka Visual Basic:

    1. V dokumentu umístit kurzor libovolně v textu.
    2. V okně editoru jazyka Visual Basic (pokud jste editor již zavřeli, otevřete jej znovu dle bodu 3) otevřít kód makra Logo – v okně projektů (Project) najít projekt aktuálního dokumentu, adresář Modules/dvakrát kliknout na NewMacros. Otevře se okno, ve kterém zobrazen kód makra Logo. Makra se ukládají do procedur, makro tedy začíná příkazem pro začátek procedury Sub Logo() a končí příkazem End Sub.
    3. Nabídka Run/Run Sub (nebo tlačítko Run Sub na panelu nástrojů, popř. klávesa F5). Makro bude provedeno, pokud má výstup do dokumentu, musíme se zpátky přepnout do dokumentu, abychom výsledek mohli vidět.
    4. Uzavřít okno Editoru jazyka Visual Basic - tlačítko Zavřít (nebo nabídka File/Close and Return to Microsoft Word).
  5. Krokování Makra: Zadání
    1. V dokumentu umístit kurzor libovolně v textu.
    2. Karta Vývojář/skupina Makra, otevře se dialogové okno Makra.
    3. V poli Název makra vybrat makro Logo.
    4. Tlačítko Upravit, v okně editoru jazyka Visual Basic se přímo zobrazí kód makra Logo (rychlejší způsob zobrazení kódu makra než v bodě 4).
    5. Uspořádat okna na obrazovce tak, aby bylo zobrazeno okno s kódem makra a současně okno s dokumentem LogoAuto.docm.
    6. V okně Editoru jazyka Visual Basic umístit kurzor do kódu makra.
    7. Krokování makra: klávesa F8, (nebo v nabídce Editoru jazyka Visual Basic volba Debug/Step Into). Provede se první příkaz (krok) makra. Dále pokračovat stejným způsobem příkaz po příkazu (krok po kroku). V průběhu krokování sledujte žlutě zvýrazněné řádky v kódu makra a současně výstup do dokumentu.
    8. Makro lze uprostřed krokování rychle dokončit tlačítkem Run nebo přerušit tlačítkem Reset na panelu nástrojů v editoru jazyka Visual Basic (nebo nabídka Run/Reset).
    9. Po ukončení krokování uzavřít okno Editoru jazyka Visual Basic - tlačítko Zavřít (nebo nabídka File/Close and Return to Microsoft Word).
  6. Z klasického makra se stane makro automatické (bude se automaticky spouštět), pokud jej přejmenujeme na určitý název. Makro, které se spouští při otevření dokumentu, bude mít název AutoOpen. Pozn. speciálních názvů pro automatická makra existuje více, např. AutoExec – spustí se při spuštění Wordu, AutoNew – spustí se při vytvoření nového dokumentu, AutoExit – spustí se při ukončení práce s Wordem. Přejmenování makra: Zadání
    1. Karta Vývojář/skupina Makra, otevře se dialogové okno Makra.
    2. V poli Název makra vybrat makro Logo.
    3. Tlačítko Upravit, v okně editoru jazyka Visual Basic, se přímo zobrazí kód makra Logo.
    4. Přepsat název makra na AutoOpen v prvním řádku makra:
    5. Sub AutoOpen()

  7. Změny v makru lze uložit běžným uložením dokumentu (např. karta Soubor/Uložit) nebo přímo v editoru jazyka Visual Basic (nabídka File/Save Makro, nebo tlačítko Save Makro na panelu nástrojů). Zavřít editor jazyka Visual Basic a dokument - tlačítko Zavřít (x v pravém horním rohu okna) v obou případech. Zadání
  8. Automatické makro vyzkoušíte otevřením dokumentu MakroAuto.docm. Zadání