VBA'da, kullanarak bir For Loop'tan çıkabilirsiniz. Çıkış İçin emretmek.
1 | Çıkış İçin |
Kodun yürütülmesi söz konusu olduğunda Çıkış İçin, bir For döngüsünden çıkar ve döngüden sonraki ilk satırla devam eder.
Bir Do döngüsünden nasıl çıkılacağını öğrenmek istiyorsanız, şu bağlantıya tıklayın: VBA Çıkış Döngüsü
Bir Koşul Karşılandığında For Döngüsünden Çık
Belirli bir koşul karşılandığında For döngüsünden nasıl çıkılacağını örnekte göreceksiniz. Her yinelemede i değişkeninin değerini döngüye alıp 1 artıracağız. 5'e gelince döngüden çıkmak ve bir mesaj kutusu döndürmek istiyoruz. İşte kod:
123456789 | Dim i Tamsayı Olaraki = 1 ila 10 içinEğer ben = 5 O zamanÇıkış İçinBitirsonraki benMsgBox "Değer" & i |
İlk olarak, i değeri 10'dan küçükse For Loop'a giriyoruz:
123 | i = 1 ila 10 içinsonraki ben |
Bundan sonra If komutunu kullanarak i'nin değerinin 5'e eşit olup olmadığını kontrol ederiz. Değer 5 ise For döngüsünden çıkıp döngüden sonraki ilk satıra geçiyoruz:
12345 | Eğer ben = 5 O zamanÇıkış İçinBitir |
Koşul karşılanmazsa, aşağıdaki ifade i'yi 1 artırır ve For döngüsüne tekrar girer:
1 | sonraki ben |
For döngüsünden çıktıktan sonra yürütülecek kodun ilk satırı, i değerine sahip mesaj kutusudur:
1 | MsgBox "Değer" & i |
Bu kodu debug modunda çalıştırırsanız 5 kez döngüden geçeceğini göreceksiniz. 5'teNS yineleme, i değişkeninin değeri 5 olur ve kod If gövdesine girer. Şimdi For döngüsünün gövdesinden çıkılır. Bundan sonra, MsgBox i değeriyle açılır:
Resim 1. Exit For Loop örneği