Vad gör jag tills Loop i VBA Excel?
I VBA Do Before Loop måste vi definiera kriterier efter till-uttalandet vilket betyder när vi vill att slingan ska stoppa och slututtalandet är själva slingan. Så om villkoret är FALSK kommer det att fortsätta att utföra uttalandet inuti slingan, men om villkoret är SANT omedelbart kommer det att lämna gör tills-uttalandet.
Som själva orden säger att för att göra en viss uppgift tills ett kriterium uppnås, gör tills slingan används i nästan alla programmeringsspråk, i VBA använder vi också ibland gör till slinga. Gör tills Loop betyder att göra något tills villkoret blir SANT. Det är som en logisk funktion som fungerar baserat på SANT eller FALSKT.
Detta är motsatsen till Do While-slingan där Do while kör slingorna så länge villkoret är SANT.
Syntax
Gör tills loop har två typer av syntax.
Syntax # 1
Gör tills (villkor) (Utför lite uppgift) Loop
Syntax # 2
Gör (Utför lite uppgift) Slinga tills (villkor)
Båda ser väldigt lika ut, och det finns en enkel differentiering.
I den första syntaxen "Gör tills" slingan kontrollerar villkoret först och får villkoret resultatet är SANT eller FALSKT. Om villkoret är FALSK kör det koden och utför en angiven uppgift, och om villkoret är SANT kommer det att gå ut ur slingan.
I den andra syntaxen, "Gör" -slingan, kommer den först att utföra torskuppgiften, sedan testas om villkoret är SANT eller FALSKT. Om villkoret är FALSKT återgår det igen och utför samma uppgift. Om villkoret är SANT kommer det genast att gå ut ur slingan.
Exempel
Jag vet att det inte är så lätt att förstå någonting i teoridelen men inget att oroa sig för. Vi ger dig enkla exempel för att förstå slingan. Läs vidare. För att starta inlärningen, låt oss utföra uppgiften att infoga de första 10 serienumren från cell A1 till A10.
Följ stegen nedan för att tillämpa "Gör tills" -slingan.
Steg 1: Skapa först ett makronamn för att starta underproceduren.
Koda:
Sub Do_Until_Example1 () Avsluta Sub
Steg 2: Definiera en variabel som "Lång". Jag har definierat “x” som en lång datatyp.
Dim x Så länge
Steg 3: Ange nu ordet "Gör tills".
Gör tills
Steg 4: Ange villkoret som “x = 11” efter start av slingans namn.
Gör tills x = 11
x = 11 är det logiska testet vi har tillämpat. Så den här linjen säger att köra slingan tills x är lika med 11.
Steg 5: Använd CELLS-egenskapen och låt oss infoga serienummer från 1 till 10.
Celler (x, 1) .Värde = x
Obs! Här har vi nämnt att "x" börjar från 1, så till att börja med är x-värdet lika med 1. Varhelst "x" finns är det lika med 1.
Steg 6: Stäng nu slingan genom att skriva in ordet "LOPP".
Sub Do_Until_Example1 () Dim x Så länge gör tills x = 11 celler (x, 1). Värde = x loop
Avsluta sub
Ok, vi är klara med kodningsdelen, nu kommer vi att testa koderna rad för rad för att förstå slingan bättre.
För att köra linjen efter linjekod, tryck först på F8-tangenten.
Det markerar först makronamnet med gul färg.
När du kan se den gula linjen står det att det inte körs om du ska utföra om du trycker på F8-tangenten en gång till.
Tryck nu på F8-tangenten en gång till, den gula linjen går till Gör tills ögla.
För att förstå slingan, placera en markör på variabeln "x" och se värdet på variabeln "x."
Så, x = 0. Eftersom den markerade raden är den första raden i slingan, så är värdet "x" noll, så tryck på F8-tangenten en gång till och se värdet på "x." Innan utgången körs koden och tilldela värdet “x” som 1.
Börja nu körningen av en slinga igen genom att trycka på F8-tangenten. Se värdet på “x”.
Nu visas värdet "x" som 1. För att ha ett inkrementellt värde till variabeln "x" måste vi tilldela värdet för variabeln "x" till x = x + 1 inuti slingan.
Tryck nu på F8-tangenten en gång till, så ska vi få värdet 1 i cell A1.
Tryck nu på F8-tangenten igen och se vad värdet på “x” är.
Värdet på variabeln "x" är nu 2. Så vårt tillstånd säger att köra slingan tills villkoret blir SANT, så vår slinga fortsätter att gå tills värdet på “x” blir 11.
Tryck på F8 en gång till. Den hoppar tillbaka till looplinjen ”Gör tills”.
Tryck på F8-tangenten ytterligare två gånger så får vi värdet 2 i cell A2.
Tryck på F8-tangenten igen och värdet “x” blir nu 3.
Tryck på F8-tangenten igen för att hoppa tillbaka till slingan igen.
Så här kommer den här slingan att fortsätta att utföra uppgiften tills värdet “x” blir 11. Nu har jag kört slingan tills “x” -värdet blir 11.
Om jag nu trycker på F8 kommer det fortfarande att gå tillbaka till slingan.
Men om jag trycker på F8-tangenten nu kommer den att gå ut ur slingan eftersom det tillämpade villkoret blir "SANT", dvs. x = 11.
Så vi har serienummer från 1 till 10 i excelbladet nu.
Så detta är den grundläggande idén i ”Do tills” -slingan. För att förstå eventuella slingor måste du köra koden rad för rad tills du får full kunskap om slingor.
