Funkcia spánku VBA
Funkcia spánku vo VBA je vlastne funkcia systému Windows. Podobá sa čakacia funkcia vo VBA. Používa sa na spomalenie alebo pozastavenie, alebo môžeme zastaviť beh konkrétneho kódu v určitom určenom čase. Funkcia spánku sa musí volať vo VBA, zatiaľ čo sa deklaruje v kóde. Ako to urobíme, sa naučíme v dnešnej téme.
Ako je vysvetlené vyššie, VBA Sleep je funkcia systému Windows a je prítomná v jadrovej databáze systému Windows. Metóda deklarovania a volania funkcie spánku vo VBA je odlišná pre 32-bitové operačné systémy aj 64-bitové operačné systémy. V podstate ide o funkciu rozhrania API systému Windows.
Syntax na použitie funkcie spánku VBA je nasledovná:
Spánok (čas v milisekundách)
Ak teda potrebujeme spomaliť alebo zastaviť kód na 1 sekundu, musíme ho napísať takto:
Spať 1 000
1000 je milión sekúnd, čo sa rovná 1 sekunde a spomalí kód na 1 sekundu. Ak chceme spomaliť kód na 5 sekúnd, kód bude:
Spať 5 000
Vyhlásenie o funkcii spánku je nasledovné:
# Ak je VBA7, potom „Excel 2010 alebo novšia verejná deklarácia PtrSafe Sub Sleep Lib“ kernel32 ”(ByVal milisekundy ako LongPtr) #Else 'Excel 2007 alebo novšia verejná deklarácia Sub Sleep Lib“ kernel32 “(ByVal milisekundy sú dlhé) #EndPoznámka: Pred použitím funkcie spánku je potrebné mať na pamäti jednu vec. Túto funkciu musíme použiť v moduloch, nie v excelentných objektoch. Použitie nástroja VBA na zabezpečenie toho, aby bola karta vývojára zapnutá na karte súbory v časti Možnosti.
Ako používať funkciu spánku Excel VBA?
Naučíme sa používať funkciu spánku VBA s niekoľkými vynikajúcimi príkladmi.
Túto šablónu VBA Sleep Excel si môžete stiahnuť tu - šablónu VBA Sleep ExcelFunkcia spánku VBA - príklad č. 1
V tomto príklade urobíme správu, že makro sa zastaví na päť sekúnd. A presne po piatich sekundách chceme, aby sa objavila druhá správa, ktorá hovorí, že makro sa obnovilo.
Ak chcete použiť funkciu spánku v programe Excel VBA, postupujte podľa nasledujúcich krokov:
Krok 1: Prejdite na kartu Vývojár a kliknutím na Visual Basic otvorte editor VB.
Krok 2: Po otvorení editora VB kliknite na kartu Vložiť a potom kliknutím na moduly vložte nový modul.
Krok 3: Teraz použite vyhlásenie a použite funkciu spánku. Pretože používam 64-bitový operačný systém Windows, použijem na to vyhlásenie.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr)
Krok 4: Teraz deklarujte subfunkciu, aby ste mohli začať písať kód.
kód:
Verejná deklarácia PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample () End Sub
Krok 5: Pomocou funkcie Mgsbox sa zobrazí správa, že makro bude pozastavené na päť sekúnd.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample () MsgBox "MAcro bude pozastavený na päť sekúnd" End Sub
Krok 6: Použite funkciu spánku na pozastavenie makra na päť sekúnd.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample () MsgBox "MAcro bude pozastavený na päť sekúnd" Sleep 5000 End Sub
Krok 7: Teraz použite funkciu msgbox na zobrazenie správy, že makro bolo obnovené.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample () MsgBox "Makro bude pozastavené na päť sekúnd" Spánok 5000 MsgBox "Makro bolo obnovené" End Sub
Krok 8: Spustite kód z poskytnutého tlačidla spustenia alebo stlačením klávesu F5 zobrazte výsledok. Vidíme, že sa zobrazí prvá správa.
Krok 9: Keď klikneme na OK a počkáme päť sekúnd, uvidíme ďalšiu správu.
Medzi oboma správami bola pauza na päť sekúnd.
Funkcia spánku VBA - príklad č. 2
Teraz urobíme v ďalšom príklade to, že mám štyri premenné A, B, C a D. Najprv chcem pridať hodnotu A a B a zobraziť ju a po 5 sekundách chcem zobraziť hodnotu pridanie A, B, C a D.
Ak chcete použiť funkciu spánku v programe Excel VBA, postupujte podľa nasledujúcich krokov:
Krok 1: Prejdite na kartu Vývojár a kliknutím na Visual Basic otvorte editor VB.
Krok 2: Po otvorení editora VB kliknite na kartu Vložiť a potom kliknutím na moduly vložte nový modul.
Krok 3: Teraz použite vyhlásenie a použite funkciu spánku. Pretože používam 64-bitový operačný systém Windows, použijem na to vyhlásenie.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr)
Krok 4: Teraz deklarujte subfunkciu, aby ste mohli začať písať kód.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample1 () End Sub
Krok 5: Vyhláste šesť premenných A, B, C, D, X a Y na uloženie hodnôt.
kód:
Verejná deklarácia PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample1 () Dim A, B, C, D, X, Y ako Celočíselný koniec Sub
Krok 6: Priraďte náhodným hodnotám A, B, C a D.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample1 () Dim A, B, C, D, X, Y ako celé číslo A = 10 B = 15 C = 20 D = 25 End Sub
Krok 7: Uložte hodnotu A + B do X.
kód:
Verejná deklarácia PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Vzorka1 () Dim A, B, C, D, X, Y ako celé číslo A = 10 B = 15 C = 20 D = 25 X = A + B End Sub
Krok 8: Zobrazte hodnotu X.
kód:
Verejná deklarácia PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Vzorka1 () Dim A, B, C, D, X, Y ako celé číslo A = 10 B = 15 C = 20 D = 25 X = A + B MsgBox X End Sub
Krok 9: Teraz použite funkciu spánku na pauzu na päť sekúnd.
kód:
Verejná deklarácia PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Vzorka1 () Dim A, B, C, D, X, Y ako celé číslo A = 10 B = 15 C = 20 D = 25 X = A + B MsgBox X Sleep 5000 End Sub
Krok 10: Teraz do premennej Y uložte hodnotu X + C + D a zobrazte ju.
kód:
Verejná deklarácia PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Vzorka1 () Dim A, B, C, D, X, Y ako celé číslo A = 10 B = 15 C = 20 D = 25 X = A + B MsgBox X Sleep 5000 Y = X + C + D MsgBox Y End Sub
Krok 11: Spustite vyššie uvedený kód z poskytnutého spúšťacieho tlačidla alebo stlačením klávesu F5 a pozrite si výsledok. Vidíme, že prvá správa je zobrazená ako.
Krok 12: Stlačte OK a makro čaká päť sekúnd a zobrazí sa nasledujúci výsledok.
Funkcia spánku VBA - príklad č. 3
V tomto príklade chceme premenovať dva listy hárkov 1 a 2 na Anand a Aran. Čas medzi nimi by však mal byť päť sekúnd. V podstate chceme, aby sa makro po premenovaní hárka 1 a potom hárka 2 pozastavilo.
Ak chcete použiť funkciu spánku v programe Excel VBA, postupujte podľa nasledujúcich krokov:
Krok 1: Prejdite na kartu Vývojár a kliknutím na Visual Basic otvorte editor VB.
Krok 2: Po otvorení editora VB kliknite na kartu Vložiť a potom kliknutím na moduly vložte nový modul.
Krok 3: Teraz použite vyhlásenie a použite funkciu spánku. Pretože používam 64-bitový operačný systém Windows, použijem na to vyhlásenie.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr)
Krok 4: Teraz deklarujte subfunkciu, aby ste mohli začať písať kód.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample2 () End Sub
Krok 5: Aktivujte list 1 a premenujte ho podľa nasledujúceho kódu:
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample2 () Pracovné hárky ("Sheet1"). Aktivácia pracovných hárkov ("Sheet1"). Názov = "Anand" MsgBox "List 1 premenovaný" End Sub
Krok 6: Teraz použite funkciu spánku a využite oneskorenie na päť sekúnd.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample2 () Pracovné hárky ("Sheet1"). Aktivácia pracovných hárkov ("Sheet1"). Názov = "Anand" MsgBox "Sheet 1 premenovaný" Sleep 5000 End Sub
Krok 7: Teraz premenujte hárok 2 na nasledujúci kód.
kód:
Verejné vyhlásenie PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) Sub Sample2 () Pracovné hárky ("Sheet1"). Aktivácia pracovných hárkov ("Sheet1"). List2 "). Aktivujte listy (" List2 "). Meno =" Aran "MsgBox" List 2 bol premenovaný na "End Sub"
Krok 8: Teraz spustite kód a vidíme prvú správu.
Môžeme tiež skontrolovať, či je list 1 premenovaný.
Krok 9: Stlačte ok a počkajte päť sekúnd, kým sa ďalšia správa a druhý hárok majú premenovať.
Druhý hárok sa tiež premenuje.
Čo je potrebné pamätať
- VBA Sleep je funkcia okna, takže ak ju chcete používať, musíme používať deklarácie.
- Existujú rôzne vyhlásenia o vyhlásení pre rôzne typy operačných systémov.
- Jednoduché použitie VBA Sleep zmrazí makro na stanovenú dobu.
- Časový parameter daný funkcii spánku VBA je v milisekundách.
Odporúčané články
Toto je sprievodca funkciou spánku VBA. Tu diskutujeme o tom, ako používať Excel VBA funkciu spánku spolu s praktickými príkladmi a stiahnuteľnou šablónou Excel. Môžete si tiež prečítať naše ďalšie navrhované články -
- Funkcia VBA VLOOKUP
- DCOUNT Funkcia v Exceli
- VBA skopírovať
- Funkcia COMBIN v Exceli