For Each Değişkenimiz in Hangi Nesne
Komutlar
Gerekirse Exit For
Next Değişkenimiz
*Each: Her biri
For Each - Next döngüsü ise nesnelerle hareket eder,rakamlara ihtiyaç duymaz,nesneler topluluğuna aynı aynı eylemi uygulatmak için kullanılır.
Şimdi örneklerle daha iyi anlamaya çalışalım.
Soru;Excel hücrelerine,föngü ile 1 ile 25 arasında rakam yazdırabilirmiyiz,
Cevap:
[code]Sub Duayen_1_25()
Dim rng As Range, say As Byte
For Each rng In Range("a1:a25")
say = say
|