Jak získat kód VBA do modulu s kódem Windows

Jedním ze způsobů, jak můžete získat kód VBA do modulu VBA, je použít záznamník maker Excel k zaznamenání vašich akcí a jejich převedení na kód VBA. Ne všechny úlohy však lze přeložit do jazyka VBA pomocí záznamu makra. Můžete také zadat kód přímo nebo zkopírovat kód z jednoho modulu a vložit jej do jiného.

Zadávání a úpravy textu v modulu VBA fungují tak, jak byste mohli očekávat. Text můžete vybírat, kopírovat, vyjímat, vkládat a dělat s ním další věci.

Jeden řádek kódu VBA může být libovolně dlouhý. Můžete však chtít použít znak pro pokračování řádku k rozdělení dlouhých řádků kódu. Chcete-li pokračovat jedním řádkem kódu (také známým jako příkaz ) z jednoho řádku na další, ukončete první řádek mezerou následovanou podtržítkem (_). Poté pokračujte ve výroku na dalším řádku. Zde je příklad jednoho příkazu rozděleného do tří řádků:

Selection.Sort Key1:=Range("A1"), _
Order1:=xlAscending, Header:=xlHádej, _
Orientace:=xlTopToBottom

Tento příkaz by fungoval stejně, pokud by byl zadán na jednom řádku (bez znaků pro pokračování řádku).

VBE má několik úrovní zpět a znovu. Pokud jste smazali příkaz, který byste neměli mít, použijte tlačítko Zpět na panelu nástrojů (nebo stiskněte Ctrl+Z), dokud se příkaz znovu nezobrazí. Po vrácení zpět můžete pomocí tlačítka Znovu provést změny, které jste vrátili.

Jste připraveni zadat skutečný, živý kód? Zkuste následující kroky:

Vytvořte nový sešit v Excelu.

Stisknutím Alt+F11 aktivujte VBE.

V okně projektu klikněte na název nového sešitu.

Zvolte Vložit → Modul pro vložení modulu VBA do projektu.

Do modulu zadejte následující kód:

Sub GuessName()
     Dim Msg jako řetězec
     Dim Ans As Long
     Msg = "Je vaše jméno " & Application.UserName & "?"
     Ans = MsgBox(Msg, vbYesNo)
     If Ans = vbNo Then MsgBox "Oh, nevadí."
     If Ans = vbYes Then MsgBox "Musím být jasnovidec!"
End Sub

Ujistěte se, že je kurzor umístěn kdekoli v textu, který jste zadali, a poté stisknutím klávesy F5 spusťte postup.

F5 je zkratka pro příkaz Spustit → Spustit Sub/UserForm.

Když zadáte kód uvedený v kroku 5, můžete si všimnout, že VBE provádí určité úpravy zadávaného textu. Například po zadání příkazu Sub VBE automaticky vloží příkaz End Sub. A pokud vynecháte mezeru před nebo za rovnítkem, VBE ji vloží za vás. VBE také mění barvu a velká písmena některých textů. Tyto změny jsou způsobem VBE, jak udržet věci čisté a čitelné.

Pokud jste postupovali podle předchozích kroků, právě jste vytvořili proceduru VBA Sub, známou také jako makro. Když stisknete F5, Excel spustí kód a bude postupovat podle pokynů. Jinými slovy, Excel vyhodnotí každý příkaz a udělá to, co jste mu řekli. Toto makro můžete spustit libovolněkrát – i když má tendenci ztrácet na přitažlivosti po několika desítkách spuštění.

Toto jednoduché makro používá následující koncepty:

  • Definování procedury Sub (první řádek)

  • Deklarování proměnných (příkazy Dim)

  • Přiřazení hodnot proměnným (Msg a Ans)

  • Zřetězení (spojení) řetězce (pomocí operátoru &)

  • Použití vestavěné funkce VBA (MsgBox)

  • Použití vestavěných konstant VBA (vbYesNo, vbNo a vbYes)

  • Použití konstrukce If-Then (dvakrát)

  • Ukončení procedury Sub (poslední řádek)

Jak již bylo zmíněno, kód můžete zkopírovat a vložit do modulu VBA. Například procedura Sub nebo Function, kterou napíšete pro jeden projekt, může být užitečná i v jiném projektu. Místo toho, abyste ztráceli čas opětovným zadáváním kódu, můžete modul aktivovat a použít běžné postupy kopírování a vkládání (Ctrl+C pro kopírování a Ctrl+V pro vkládání). Po vložení kódu do modulu VBA můžete kód podle potřeby upravit.


Jak zablokovat aplikaci Microsoft Word v otevírání souborů v režimu pouze pro čtení v systému Windows

Jak zablokovat aplikaci Microsoft Word v otevírání souborů v režimu pouze pro čtení v systému Windows

Jak zablokovat aplikaci Microsoft Word v otevírání souborů v režimu pouze pro čtení v systému Windows Aplikace Microsoft Word otevírá soubory v režimu pouze pro čtení, takže je nelze upravovat? Nebojte se, metody jsou uvedeny níže

Jak opravit nesprávný tisk dokumentů Microsoft Word

Jak opravit nesprávný tisk dokumentů Microsoft Word

Jak opravit chyby při tisku nesprávných dokumentů Microsoft Word Chyby při tisku dokumentů Word se změněným písmem, chaotickými odstavci, chybějícím textem nebo ztraceným obsahem jsou poměrně časté. Nicméně ne

Vymažte kresby perem a zvýrazňovačem na snímcích PowerPoint

Vymažte kresby perem a zvýrazňovačem na snímcích PowerPoint

Pokud jste použili pero nebo zvýrazňovač ke kreslení na snímky aplikace PowerPoint během prezentace, můžete kresby uložit pro další prezentaci nebo je vymazat, takže až ji příště ukážete, začnete s čistými snímky aplikace PowerPoint. Chcete-li vymazat kresby perem a zvýrazňovačem, postupujte podle těchto pokynů: Mazání čar jedna na […]

Obsah knihovny stylů v SharePointu 2010

Obsah knihovny stylů v SharePointu 2010

Knihovna stylů obsahuje soubory CSS, soubory XSL (Extensible Stylesheet Language) a obrázky používané předdefinovanými vzorovými stránkami, rozvržení stránek a ovládací prvky v SharePointu 2010. Chcete-li najít soubory CSS v knihovně stylů webu pro publikování: Vyberte Akce webu→ Zobrazit Veškerý obsah webu. Zobrazí se obsah webu. Knihovna stylů se nachází v […]

Formátování čísel v tisících a milionech v sestavách Excel

Formátování čísel v tisících a milionech v sestavách Excel

Nezahlcujte své publikum gargantuovskými čísly. V aplikaci Microsoft Excel můžete zlepšit čitelnost řídicích panelů a sestav formátováním čísel tak, aby se zobrazovaly v tisících nebo milionech.

Jak sdílet a sledovat weby SharePoint

Jak sdílet a sledovat weby SharePoint

Naučte se používat nástroje sociálních sítí SharePoints, které umožňují jednotlivcům a skupinám komunikovat, spolupracovat, sdílet a propojovat se.

Jak převést data do juliánských formátů v aplikaci Excel

Jak převést data do juliánských formátů v aplikaci Excel

Juliánská data se často používají ve výrobním prostředí jako časové razítko a rychlý odkaz pro číslo šarže. Tento typ kódování data umožňuje maloobchodníkům, spotřebitelům a servisním zástupcům identifikovat, kdy byl produkt vyroben, a tím i stáří produktu. Juliánská data se také používají v programování, armádě a astronomii. Odlišný […]

Jak vytvořit webovou aplikaci Access

Jak vytvořit webovou aplikaci Access

Webovou aplikaci můžete vytvořit v Accessu 2016. Co je tedy vlastně webová aplikace? Web znamená, že je online, a aplikace je jen zkratka pro „aplikaci“. Vlastní webová aplikace je online databázová aplikace přístupná z cloudu pomocí prohlížeče. Webovou aplikaci vytváříte a udržujete ve verzi pro počítače […]

Panel rychlého spuštění v SharePointu 2010

Panel rychlého spuštění v SharePointu 2010

Většina stránek v SharePointu 2010 zobrazuje seznam navigačních odkazů na panelu Snadné spuštění na levé straně stránky. Panel Snadné spuštění zobrazuje odkazy na doporučený obsah webu, jako jsou seznamy, knihovny, weby a stránky publikování. Panel Snadné spuštění obsahuje dva velmi důležité odkazy: Odkaz na veškerý obsah webu: […]

Co znamenají chybové zprávy Řešitel v Excelu?

Co znamenají chybové zprávy Řešitel v Excelu?

U jednoduchých problémů Řešitel v Excelu obvykle rychle najde optimální hodnoty proměnné Řešitel pro účelovou funkci. Ale v některých případech má Řešitel problém najít hodnoty proměnné Řešitel, které optimalizují účelovou funkci. V těchto případech Řešitel obvykle zobrazí zprávu nebo chybovou zprávu, která popisuje nebo popisuje problém, který […]