Co je to Do Loop ve VBA Excel?
Ve VBA Do While Loop musíme definovat kritéria po příkazu until, což znamená, když chceme, aby se smyčka zastavila a koncový příkaz je smyčka sama. Pokud je tedy podmínka NEPRAVDA, bude pokračovat ve vykonávání příkazu uvnitř smyčky, ale pokud je podmínka hned PRAVDA, ukončí příkaz Do Dokud.
Protože samotná slova říkají, že dělat nějaký úkol, dokud není dosaženo kritéria, proveďte Do, dokud se smyčka nepoužívá téměř ve všech programovacích jazycích, ve VBA také někdy používáme smyčku Do do. Do Until Loop znamená dělat něco, dokud se podmínka nestane PRAVDA. Je to jako logická funkce, která funguje na základě PRAVDA nebo NEPRAVDA.
Toto je opak smyčky Do While, kde Do while běží smyčky, pokud je podmínka TRUE.
Syntax
Smyčka Do Until má dva druhy syntaxe.
Syntaxe č. 1
Smyčka Do Do (podmínka) (Provedení nějaké úlohy)
Syntaxe č. 2
Proveďte (Proveďte nějaký úkol) Smyčku dokud (podmínka)
Oba vypadají velmi podobně a existuje jedna jednoduchá diferenciace.
V první syntaxi smyčka „Do Dokud“ nejprve zkontroluje podmínku a získá výsledek podmínky, je TRUE nebo FALSE. Pokud je podmínka FALSE, provede kód a provede zadanou úlohu, a pokud je podmínka TRUE, pak smyčku opustí.
Ve druhé syntaxi, smyčka „Do“, nejprve provede úlohu cod, poté otestuje, zda je podmínka TRUE nebo FALSE. Pokud je podmínka NEPRAVDA, vrátí se zpět a provede stejný úkol. Pokud je podmínka PRAVDA, pak smyčku okamžitě opustí.
Příklad
Vím, že není tak snadné pochopit cokoli v teoretické části, ale není se čeho bát. Dáme vám jednoduché příklady k pochopení smyčky. Číst dál. Chcete-li zahájit učení, provedeme úkol vložení prvních 10 sériových čísel z buňky A1 do A10.
Podle níže uvedených kroků použijte smyčku „Do“.
Krok 1: Nejprve vytvořte název makra a spusťte podproces.
Kód:
Sub Do_Until_Example1 () End Sub
Krok 2: Definujte proměnnou jako „Long“. Definoval jsem „x“ jako dlouhý datový typ.
Dim x As Long
Krok 3: Nyní zadejte slovo „Do“.
Dělat do
Krok 4: Po spuštění názvu smyčky zadejte podmínku jako „x = 11“.
Do Dokud x = 11
x = 11 je logický test, který jsme použili. Tento řádek tedy říká, že běží smyčka, dokud se x nebude rovnat 11.
Krok 5: Použijte vlastnost CELLS a vložme sériová čísla od 1 do 10.
Buňky (x, 1). Hodnota = x
Poznámka: Zde jsme zmínili, že „x“ začíná od 1, takže nejprve je hodnota x rovna 1. Kdekoli je „x“, je rovna 1.
Krok 6: Nyní uzavřete smyčku zadáním slova „LOOP“.
Sub Do_Until_Example1 () Dim x As Long Do Dokud x = 11 buněk (x, 1). Hodnota = x Loop
End Sub
Dobře, jsme hotovi s kódovací částí, nyní budeme testovat kódy řádek po řádku, abychom lépe porozuměli smyčce.
Chcete-li spustit řádek po řádku, nejprve stiskněte klávesu F8.
Nejprve zvýrazní název makra žlutou barvou.
Když vidíte žlutou čáru, znamená to, že se neprovede spuštěním, pokud stisknete klávesu F8 ještě jednou.
Nyní stiskněte ještě jednou klávesu F8, žlutá čára přejde na Do Do Loop.
Abychom smyčce porozuměli, umístěte kurzor na proměnnou „x“ a podívejte se na hodnotu proměnné „x“.
Takže x = 0. Protože zvýrazněný řádek je první řádek ve smyčce, takže hodnota „x“ je nula, stiskněte znovu klávesu F8 a podívejte se na hodnotu „x“. Před tímto ukončením je spuštěn kód a přiřaďte hodnotu „x“ jako 1.
Nyní znovu spusťte běh smyčky stisknutím klávesy F8. Podívejte se na hodnotu „x“.
Nyní se hodnota „x“ zobrazuje jako 1. Chcete-li mít k proměnné „x“ přírůstkovou hodnotu, musíme ve smyčce znovu přiřadit hodnotu proměnné „x“ jako x = x + 1.
Nyní stiskněte klávesu F8 ještě jednou a měli bychom získat hodnotu 1 v buňce A1.
Nyní stiskněte znovu klávesu F8 a podívejte se, jaká je hodnota „x“.
Hodnota proměnné „x“ je nyní 2. Naše podmínka tedy říká, že máme spustit smyčku, dokud se podmínka nestane PRAVDA, takže naše smyčka běží dál, dokud hodnota „x“ nebude 11.
Stiskněte klávesu F8 ještě jednou. Přeskočí zpět na řádek smyčky „Do Until“.
Stiskněte klávesu F8 ještě dvakrát a v buňce A2 získáme hodnotu 2.
Stiskněte znovu klávesu F8 a hodnota „x“ se nyní změní na 3.
Opětovným stisknutím klávesy F8 přejdete zpět do smyčky.
Takto bude tato smyčka znovu vykonávat úkol, dokud se hodnota „x“ nestane 11. Nyní jsem smyčku prováděl, dokud se hodnota „x“ nestane 11.
Pokud teď stisknu klávesu F8, vrátí se zpět do smyčky.
Pokud ale nyní stisknu klávesu F8, smyčka se ukončí, protože použitá podmínka se stane „PRAVDA“, tj. X = 11.
Takže nyní máme v excelovém listu sériová čísla od 1 do 10.
Toto je základní myšlenka smyčky „Do Until“. Chcete-li porozumět jakýmkoli smyčkám, musíte spustit kód po řádku, dokud nezískáte úplné znalosti o smyčkách.
