U VBA -u možete se kretati kroz niz ćelija primjenjujući radnje na svaku ćeliju u rasponu.
Ako želite testirati uvjete za svaku ćeliju u rasponu pomoću VBA, najbolji način je da prođete kroz raspon, testirajući svaku ćeliju. Evo dva primjera koda koji pokazuju kako se petljati kroz raspon. Vrijednost raspona možete zamijeniti za bilo koji raspon koji trebate proći.
Petlja kroz niz ćelija
Ovaj će primjer proći kroz niz ćelija. Naredba if testira uvjet ako ćelija sadrži tekst "FindMe" i prikazuje okvir s porukom s mjestom teksta ako je pronađen.
1234567891011 | Javne pod -petlje ćelije ()Dim c As RangeZa svaki c u rasponu ("A1: A10")Ako je c.Value = "FindMe" TadaMsgBox "FindMe pronađeno na" & c.AdressZavrši akoSljedeće cKraj podm |
Petlja kroz cijeli stupac
Ovaj primjer kruži kroz cijeli raspon stupca A.
1234567891011 | Javni podkolonac LoopColumn ()Dim c As RangeZa svaki c u rasponu ("A: A")Ako je c.Value = "FindMe" TadaMsgBox "FindMe pronađeno na" & c.AdressZavrši akoSljedeće cKraj podm |
Petlja kroz cijeli niz
Sljedeći primjer kruži kroz prvi red uzimajući u obzir cijeli niz u rasponu.
1234567891011 | Javni sub LoopRow ()Dim c As RangeZa svaki c u rasponu ("1: 1")Ako je c.Value = "FindMe" TadaMsgBox "FindMe pronađeno na" & c.AdressZavrši akoSljedeće cKraj podm |