Okamžité okno VBA sa používa na rýchle spustenie riadkov kódu VBA a načítanie informácií o vašom kóde alebo súbore Excel … Tento nástroj vám umožňuje testovať jednotlivé riadky kódu, čo je užitočné pri písaní a ladení kódu. Výstup sa zobrazí v bezprostrednom okne.
Zobrazenie okamžitého okna
Najprv musíte zobraziť okamžité okno. Ak to chcete urobiť, stlačte Alt-F11 vstúpiť do Editor jazyka Visual Basic. Po vložení modulu. Stlačte Ctrl-G zobraziť Okamžité okno.
Mali by ste vidieť nasledujúce:
Vykonávanie riadkov kódu
Jedna z vecí, ktoré vám okno Okamžité okno umožňuje, je otestovať riadok kódu. Nasledujúci kód vám ukáže, ako použiť okamžité okno na vyplnenie bunky A1 aktívneho listu svetlo oranžovou farbou výplne. Zadajte nasledujúci riadok a potom stlačte kláves Enter na klávesnici:
| 1 | Rozsah („A1“). Interiér. Farba = RGB (246, 174, 134) |
Výsledkom je:
Otázky a okamžité okno
Na získanie informácií o svojom zošite môžete použiť Okamžité okno. Môžete to urobiť pomocou otáznika. Ak zadáte vyhlásenie, pred ktorým bude otáznik, potom okamžité okno zobrazí príslušnú odpoveď. Povedzme, že v vybratej bunke A1 máte číslo 5. Nasledujúci kód vám umožní použiť okamžité okno na získanie tejto hodnoty:
| 1 | „ActiveCell.Value |
Výsledkom je:
Spustite makro z okamžitého okna
Makro môžete spustiť z okna Okamžité zadaním názvu makra a stlačením klávesu Enter. Ak vaše makro obsahuje argumenty, môžete použiť okamžité okno a odoslať ich do makra cez okamžité okno. Nasledujúci kód ukazuje, ako volať makro s názvom CountWorksheets z bezprostredného okna:
| 1 | CountWorksheets |
Po stlačení klávesu Enter sa výsledok zobrazí na pracovnom hárku v bunke A1.
Použitie Debug.Print
Debug.Print môžete použiť ako súčasť svojich čiastkových procedúr, čo oznámi okamžitému oknu zobrazenie určitých informácií. Toto sa používa, ak nechcete zobrazovať hodnoty alebo výsledky v bunke v samotnom zošite alebo v poli so správou. Nasledujúci kód používa príkaz Debug.Print ako súčasť čiastkového postupu a výsledky zobrazuje v bezprostrednom okne.
| 12345678910 | Sub UsingDebugPrint ()Dim FirstName As StringDim LastName as StringFirstName = "Jane"Priezvisko = "Williams"Debug.Print FirstName & "" & LastNameKoniec pod |
Výsledok, keď spustíte makro stlačením klávesu F5, sa zobrazí v bezprostrednom okne:
Použitie bezprostredného okna pri spustení kódu
Pri prechode kódom môžete použiť aj okamžité okno na nastavenie alebo získanie hodnoty premennej:
| 1234567891011 | Sub GetAndSettingVariableValues ()Dim LName As StringDim SName As StringDim Age ako celé čísloLName = "John"SName = "Smith"Vek = 31Koniec pod |
Nasledujúci kód má bod zlomu, ktorý je vložený nasledujúcim spôsobom:
Ak do okamžitého okna zadáte? SName pri zadávaní kódu pomocou klávesu F8, v bode zlomu získate nasledujúci výsledok:
