V tem učbeniku bomo opisali, kako uporabiti VBA da v Excelu naredite zanko skozi vrstice v območju. Zanke uporabljamo zato, da preprečimo ponavljanje iste stvari. Med delom v Microsoft Excel , se lahko znajdemo v položaju, ko moramo isto nalogo opraviti večkrat. To lahko preprosto storimo z uporabo zank v VBA . V tem članku bomo prikazali 6 primeri za zanko skozi vrstice v Excelu z VBA Zanka, ki jo bomo uporabljali v vseh primerih, je Naslednja zanka '.

Prenesi delovni zvezek za prakso

Praktični delovni zvezek lahko prenesete s tega mesta.

6 primerov za zanko skozi vrstice v območju z VBA v Excelu

Za ponazoritev primerov v tem učbeniku bomo uporabili naslednji nabor podatkov. Nabor podatkov vsebuje zneske prodaje za prva dva meseca leta 5 prodajalcev .

1. Uporaba VBA v območju s spremenljivko Range za zanko skozi vrstice

V prvem primeru bomo spremenljivko range uporabili za kroženje po vrsticah v območju z uporabo VBA v Excelu. Uporabili bomo VBA zanko v naslednjem naboru podatkov.

Oglejmo si korake za izvedbo tega primera.

KORAKI:

• Najprej pojdite na aktivni delovni list Razpon Spremenljivka '.
• Poleg tega, z desnim klikom miške kliknite . in izberite možnost Prikaži kodo '. Prav tako lahko pritisnete Alt + F11 da ga odprete.

• Zgornje dejanje odpre okno kode za ta delovni list.
• Nato vnesite kodo v okno za kodo:

 Sub VBA_Loop_through_Rows() Dim w As Range For Each w In Range("B5:D9").Rows w.Cells(1).Interior.ColorIndex = 35 Next End Sub 

• Nato kliknite na Spustite ali pritisnite F5 za zagon kode.

• Na koncu bomo dobili rezultate, kot je naslednji posnetek zaslona.

Preberi več: Excel VBA: zanka skozi stolpce v območju (5 primerov)

2. Uporaba VBA za zanko skozi vrstice v območju s številsko spremenljivko

Druga možnost za premikanje po vrsticah v območju je izbira spremenljivke. V drugem primeru bomo uporabili VBA v naslednjem podatkovnem nizu, da bi naredili zanko skozi vrstice v območju s številskimi spremenljivkami.

Oglejmo si korake za izvedbo te metode.

KORAKI:

• Najprej, z desnim klikom miške kliknite . na aktivnem listu z imenom Številčna vrednost '.
• Nato izberite možnost Prikaži kodo '.

• To dejanje bo odprlo okno kode za ta delovni list. Alt + F11 da odprete to okno kode.
• v to okno vnesite naslednjo kodo:

 Sub VBA_Numeric_Variable() Dim w As Integer With Range("B5").CurrentRegion For w = 1 To .Columns.Count .Columns(w).NumberFormat = "$0.00" Next End With End Sub 

• Nato kliknite na Spustite ali pritisnite F5 za zagon kode.

• Na koncu lahko vidimo rezultate, kot so na naslednji sliki. Zgornja koda spremeni obliko števila v decimalno vejico.

Preberite več: VBA za zanko skozi vrstice in stolpce v območju v Excelu (5 primerov)

3. Excel VBA v uporabniško izbranem območju za zanko skozi vrstice v območju

V tretjem primeru bomo uporabili VBA v uporabniško izbranem območju, da bi naredil zanko skozi vrstice v območju. Uporabnik bo torej lahko uporabil zanko na izbranem območju podatkovnega niza.

Oglejmo si korake, povezane s tem primerom.

KORAKI:

• Na začetku izberite območje celic ( D5:D9 ).

• Naslednji, z desnim klikom miške kliknite . na aktivnem listu z imenom Izbrani uporabnik '. Izberite možnost ' Prikaži kodo '.

• Zgornji ukaz bo odprl VBA okno kode za aktivni delovni list. To okno kode lahko odprete tudi tako, da pritisnete Alt + F11 . V to prazno okno kode vstavite naslednjo kodo:

 Sub VBA_User_Selection() Dim w As Variant Set xRange = Selection For Each w In xRange MsgBox "Cell value = " & w.Value Next w End Sub 

• Če želite zagnati kodo za ta delovni list, kliknite na Spustite ali pritisnite F5 ključ.

• Tako se prikaže okno s sporočilom, ki prikazuje prvo vrednost izbranega območja.

• Poleg tega, če kliknete na V REDU vrne drugo vrednost izbranega območja, ki je celica D6 .

• Ta postopek se bo nadaljeval, dokler se ne bo izpisala zadnja vrednost izbranega območja, ki je celica D9 .

Preberite več: Kako uporabiti VBA za štetje vrstic v območju s podatki v Excelu (5 makrov)

Podobna branja

• Kako uporabiti VBA za izbiro območja iz aktivne celice v Excelu (3 metode)
• Excelov makro: Razvrstite več stolpcev z dinamičnim obsegom (4 metode)
• Kako pretvoriti obseg v polje v programu Excel VBA (3 načini)

4. Zanka skozi vrstice v dinamičnem obsegu z VBA

V četrtem primeru bomo uporabili VBA za ustvarjanje zanke skozi vrstice v dinamičnem območju. Ta primer se nekoliko razlikuje od prejšnjih. Območje v zanki bomo lahko prilagodili delovnemu listu excel-a. Za ponazoritev te metode bomo uporabili naslednji podatkovni niz. V naslednjem podatkovnem nizu bomo zapolnili vrednosti območja ( B8:C12 ) z določeno vrednostjo.

Za izvedbo te metode preberite spodnje korake.

KORAKI:

• Prvič, vhodna vrednost 6 v celici B1 in . C v celici B2 .
• Drugič, z desnim klikom miške kliknite . na aktivni celici in izberite možnost Prikaži kodo '.

• Ta ukaz bo odprl VBA okno kode za aktivni delovni list. Drugi način za odprtje tega okna kode je pritisk Alt + F11 .
• V to okno kode vstavite naslednjo kodo:

 Sub Dynamic_Range() Dim xRange As String xRange = "B8:" + Worksheets("Dynamic Range").Cells(2, 2).Value + _ CStr(3 + Worksheets("Dynamic Range").Cells(1, 2).Value) Za vsako vrstico v Range(xRange) Za vsako celico v vrstici Cell.Value = "$2500.00" Naslednja celica Naslednja vrstica End Sub 

• Če želite zagnati kodo, kliknite na Spustite ali pritisnite F5 ključ.

• Posledično se podatkovni niz napolni z vrednostjo $2500.00 na naslednji način.

OPOMBA:

Na zgornji sliki je vrednost 6 predstavlja prvi dve vrstici območja ( B8: B9 ).

• Na koncu vnesite vrednost 9 v celici B1 namesto 6 Rezultate si lahko ogledamo na naslednji sliki.

5. Vstavite VBA za zanko skozi celotno vrstico v območju

V petem primeru bomo videli, kako lahko uporabimo VBA da naredite zanko skozi celotno vrstico v območju. Ta primer bo našel položaj določene vrednosti iz izbrane ene ali več vrstic.

Oglejmo si korake, po katerih bomo izvedli ta primer.

KORAKI:

• Za začetek, z desnim klikom miške kliknite . na aktivnem listu z imenom Celotna vrstica '. Izberite možnost ' Prikaži kodo '.

• Zgornji ukaz odpre prazno okno VBA okno kode za aktivni delovni list. To okno kode lahko odpremo tudi tako, da pritisnemo Alt + F11 .
• Nato v to okno kode vstavite naslednjo kodo:

 Sub VBA_Loop_Entire_Row() Dim w As Range For Each w In Range("5:9") If w.Value = "Chris" Then MsgBox "Chris found at " & w.Address End If Next w End Sub 

• Nato kliknite na Spustite ali pritisnite F5 za zagon kode.

• Na zgornji sliki je označena vrednost Chris ' označuje vrednost, ki jo bomo iskali. Vrednost območja ' 5:9 ' pomeni, da bomo iskali vrednost v območju celic ( B5:B9 ).
• Na koncu se prikaže okno s sporočilom, da je vrednost Chris ' se nahaja v celici B6 .

Preberite več: Kako uporabiti VBA za vsako vrstico v območju v Excelu

6. Zavihek skozi vsako n-to vrstico v območju z Excelovim VBA

V zadnjem primeru bomo uporabili VBA da se v zanki pregleda vsak n-ti Vrstica v obsegu. V naslednjem podatkovnem nizu bomo uporabili barvno senčenje za liho število vrstic našega podatkovnega obsega.

Oglejmo si korake za izvedbo te metode.

KORAKI:

• Najprej, z desnim klikom miške kliknite . na aktivnem listu z imenom n-ta vrstica '. Izberite možnost ' Prikaži kodo '.

• Nato odpre prazno okno VBA Okno kode za ta delovni list. To okno kode lahko odpremo tudi tako, da pritisnemo Alt + F11 .
• Nato v to okno kode vnesite naslednjo kodo:

 Sub ShadeRows1() Dim r As Long With Range("B5").CurrentRegion For r = 1 To .Rows.Count If r / 2 = Int(r / 2) Then 'parne vrstice .Rows(r).Interior.ColorIndex = 43 End If Next End With End Sub 

• Zdaj kliknite na Spustite ali pritisnite F5 za zagon kode.

• Nazadnje lahko vidimo, da zgornja koda iz našega nabora podatkov izloči le vrstice z lihim številom.

Preberi več: Excel VBA za zanko v območju do prazne celice (4 primeri)

Zaključek

Na koncu vam ta vadnica omogoča, da 6 Primeri vrtenja skozi vrstice v območju z VBA Če imate kakršnakoli vprašanja, pustite komentar v spodnjem polju. Naša ekipa bo poskušala odgovoriti na vaše sporočilo v najkrajšem možnem času. Bodite pozorni na še več iznajdljivih Microsoft Excel rešitve v prihodnosti.