Okamžité okno VBA slouží k rychlému spouštění řádků kódu VBA a načítání informací o vašem kódu nebo souboru aplikace Excel … Tento nástroj vám umožňuje testovat jednotlivé řádky kódu, což je užitečné při psaní a ladění kódu. Výstup se zobrazí v okně Okamžité.
Zobrazení okamžitého okna
Nejprve musíte zobrazit Okamžité okno. Chcete -li to provést, stiskněte Alt-F11 pro vstup do Editor jazyka Visual Basic. Jakmile vložíte modul. lis Ctrl-G zobrazit Okamžité okno.
Měli byste vidět následující:
Provádění řádků kódu
Jedna z věcí, které vám okno Immediate umožňuje, je otestovat řádek kódu. Následující kód vám ukáže, jak použít okamžité okno k vyplnění buňky A1 aktivního listu světle oranžovou barvou výplně. Zadejte následující řádek a stiskněte klávesu Enter na klávesnici:
| 1 | Rozsah ("A1"). Interior.Color = RGB (246, 174, 134) |
Výsledek je:
Otázky a okamžité okno
K získání informací o vašem sešitu můžete použít Okamžité okno. To lze provést pomocí otazníku. Pokud zadáte prohlášení, kterému bude předcházet otazník, pak okamžité okno doručí příslušnou odpověď. Řekněme, že máte číslo 5 v buňce A1, která je vybrána. Následující kód vám umožní použít okamžité okno k získání této hodnoty:
| 1 | „ActiveCell.Value |
Výsledek je:
Spusťte makro z okamžitého okna
Makro můžete spustit z okamžitého okna zadáním názvu makra a stisknutím klávesy Enter. Pokud vaše makro obsahuje argumenty, můžete použít okamžité okno a předat argumenty makru přes okamžité okno. Následující kód ukazuje, jak zavolat makro s názvem CountWorksheets z okamžitého okna:
| 1 | CountWorksheets |
Po stisknutí klávesy Enter se výsledek zobrazí na listu v buňce A1.
Použití Debug.Print
Můžete použít Debug.Print jako součást vašich dílčích procedur a to řekne okamžitému oknu, aby zobrazilo určité informace. To se používá, pokud nechcete zobrazovat hodnoty nebo výsledky v buňce v samotném sešitu nebo v okně zprávy. Následující kód používá příkaz Debug.Print jako součást dílčí procedury a výsledky zobrazuje v okně Immediate.
| 12345678910 | Sub UsingDebugPrint ()Dim FirstName As StringDim LastName As StringFirstName = "Jane"Příjmení = "Williams"Debug.Print FirstName & "" & LastNameEnd Sub |
Výsledek při spuštění makra stisknutím klávesy F5 se zobrazí v okně Immediate:
Použití okamžitého okna při spuštění kódu
Při procházení kódu můžete také použít okamžité okno k nastavení nebo získání hodnoty proměnné:
| 1234567891011 | Sub GettingAndSettingVariableValues ()Dim LName As StringDim SName jako řetězecDim Age jako celé čísloLName = "John"SName = "Smith"Věk = 31End Sub |
Následující kód má zarážku, která je vložena, jak je uvedeno níže:
Pokud zadáte? SName v okamžitém okně při zadávání kódu pomocí F8, v bodě zlomu získáte následující výsledek:
