VBA'da, aralıktaki her hücreye eylemler uygulayarak bir dizi hücre arasında dolaşabilirsiniz.
VBA kullanarak bir aralıktaki her hücre için bir koşulu test etmek istiyorsanız, en iyi yol, her hücreyi test ederek aralıkta döngü yapmaktır. Bir aralıkta nasıl döngü yapılacağını gösteren iki kod örneği. Döngü yapmanız gereken aralık için aralık değerini değiştirebilirsiniz.
Hücre Aralığında Döngü
Bu örnek, bir hücre aralığında döngü yapacaktır. if ifadesi, hücrenin "Beni Bul" metnini içerip içermediğini test eder ve bulunursa metnin konumunu içeren bir mesaj kutusu gösterir.
1234567891011 | Genel Alt DöngüHücreleri()Dim c Aralık olarakAralıktaki Her c İçin("A1:A10")c.Value = "Beni Bul" iseMsgBox "FindMe bulundu" & c.AddressBitirsonraki cAlt Bitiş |
Tüm Sütun Boyunca Döngü
Bu örnek, tüm A sütunu aralığı boyunca döner.
1234567891011 | Public Sub LoopColumn()Dim c Aralık olarakAralıktaki Her c İçin("A:A")c.Value = "Beni Bul" iseMsgBox "FindMe bulundu" & c.AddressBitirsonraki cAlt Bitiş |
Tüm Satır Boyunca Döngü
Sonraki örnek, tüm satırı bir aralık olarak kabul ederek satır 1'de dolaşıyor.
1234567891011 | Genel Alt DöngüRow()Dim c Aralık olarakHer c için Aralıkta("1:1")c.Value = "Beni Bul" iseMsgBox "FindMe bulundu" & c.AddressBitirsonraki cAlt Bitiş |