hvordan anvendes til

, den simpleste form for loop i excel - vba programmering er et for næste loop.de ni er kontrolleret af en tæller variabel, som begynder med en værdi og stopper ved en anden værdi.de erklæringer, mellem for redegørelse og den næste oversigt er de erklæringer, som bliver gentaget i loop. en til næste eksempel, som for eksempel bruger til næste brug, beløb de første 1000 positive tal.den samlede variable starter som nul.så ni forekommer.variablen cnt er orienteret mod.det starter som 1 og forøges med 1 hver gang gennem løkken.det slutter, når arbejdstilsynet er 1000. dette eksempel er kun en erklæring i loop.denne erklæring er værdien af arbejdstilsynet til den samlede variable.når det er slut, en msgbox viser summen af tallene. i addnumbers() dim samlede som dobbelt dim cnt, så længe den samlede = 0 for arbejdstilsynet = 1 - 1000 i alt = i alt + cnt næste cnt msgbox endelige afrika, fordi den sløjfe skranke er en normal variabel, du kan skrive koden til at ændre sin værdi i den blok af kode mellem for - og den næste erklæringer.det er imidlertid en meget dårlig praksis. for næste eksempler med et skridt, man kan bruge et skridt værdi til at springe nogle mod værdier i en for næste loop.her og’ er det foregående eksempel omskrevet til beløb kun ulige tal mellem 1 og 1: i addoddnumbers() dim samlede som dobbelt dim cnt, så længe den samlede = 0 for arbejdstilsynet = 1 - 1000 trin 2 i alt = i alt + cnt næste cnt msgbox samlede ende under denne gang cnt starter som 1. og så tager på værdier af 3, 5, 7 og så videre.det skridt, værdi afgør, hvor tælleren forøges.bemærker, at den øvre loop - værdi (1000) faktisk ikke bruges, fordi den højeste værdi af arbejdstilsynet vil være 999. her ’ er et andet eksempel, der anvender et skridt - værdi på 3.denne procedure virker med aktiv status og gælder lys grå skygger hver tredje række, fra linje 1 til række 100. i shadeeverythirdrow() dim jeg så længe for i = 1 til 100 trin 3 rækker (i). interior.color = rgb (200, 200, 200) næste jeg sub, se resultatet af denne makroøkonomiske. ved hjælp af en løkke til at anvende baggrund skygge til rækker.en til næste eksempel med en udgang til udtalelse, et for næste loop, også kan omfatte en eller flere udgange for udtalelser i loop.når retten har denne erklæring, det bringer straks. følgende eksempel viser udgangen til udtalelse.dette nummer er en funktion - procedure, som skal anvendes i en kladde formel.den funktion, accepterer et argument (en variabel, der hedder str) og giver tegn til venstre for den første numeriske ciffer.for eksempel, hvis det argument er “ kbr98z, og” og den funktion, vender tilbage og“ og kbr. ”, funktion textpart (str) dim jeg så længe textpart = “ “ for i = 1 - len (tlf. hvis isnumeric (mid - tlf. jeg, 1)) og gå til andre textpart = textpart & mid (tlf. jeg, 1), hvis det næste, jeg stopper funktion, den næste loop begynder med 1 og slutter med det antal, der svarer til antallet af personer i snor.koden anvendes vba ’ s mid - funktion til at udtrække en enkelt karakter i loop.hvis en numerisk karakter er fundet udgangen for redegørelse er gennemført, og det slutter tidligt., hvis karakter er ikke numerisk, det er knyttet til den resulterende værdi (som er den samme som den funktion, og’ navn).den eneste gang, det vil undersøge alle karakter, hvis den snor vedtaget som argument ikke indeholder numeriske tegn. en indlejrede for næste eksempel, kan du få en række udtalelser i løkken og rede til næste sløjfer i andre for næste loops. følgende eksempel bruger en satte sig for at indsætte tilfældige tal næste loop i en 12-row-by-5-column vifte af celler.bemærker, at rutinen gennemfører, indre loop (loop med ro - tæller) én gang for hver udgave af den ydre cirkel (loop med kol - tæller).med andre ord, rutinemæssig gennemfører celler (ro, kol) = og erklæring 60 gange. disse celler var fyldt med indlejrede for næste loop., under fillrange() dim kol så længe dim ro så længe til kol = 1 til 5 for ro = 1 til 12 celler (ro, kol) = og næste række næste kol ende under den næste eksempel bruger indlejrede for næste loops til at aktivere et tredimensionalt system med værdien 100.denne rutine gennemfører erklæring i midten af alle loop (overdragelse erklæring) 1000 gange (10 * 10 * 10), hver gang med en anden kombination af værdier for i, j og k: sub nestedloops() dim myarray (10, 10, 10) dim jeg så længe dim j, så længe dim k, så længe for i = 1 til 10 j = 1 til 10 k = 1 - 10 myarray (i, j, k) = 100 næste k næste j næste jeg ‘ andre erklæringer her stopper de her ’ et sidste eksempel, der anvender indlejrede for næste loops. med et skridt værdi.denne procedure er en checkerboard ved at ændre baggrunden farve skiftende celler. ved hjælp af kredsløb, til at skabe en checkerboard mønster.linjen mod loops fra 1 til 8.hvis så opføre afgør, hvilket satte for næste struktur til at bruge.for ulige rækker, kol tælleren begynder med 2.for selv talte rækker, kol tælleren begynder med 1.begge stropper brug et skridt værdi af 2, så alternative celler er berørt.to yderligere erklæringer gør cellerne. - ligesom en rigtig checkerboard). i makecheckerboard() dim r så længe, c, så længe f = 1 til 8, hvis worksheetfunction. isodd (r) for c = 2 til 8 trin 2 - celler (f, c). interior.color = 255 næste c andet, c = 1 - 8 trin 2 - celler (f, c). interior.color = 255 næste c, hvis næste r rækker (“ 1: 8 ”). rowheight = 35 kolonne (“ en h ”). columnwidth = 6,5 ende ubåd,,

Using a loop to apply background shading to rows.
These cells were filled by using a nested For-Next loop.
Using loops to create a checkerboard pattern.



Previous:
Next Page: