Excel VBA Döngüler ve Koşullu İfadeler: For, Do While, If ve Select Case
1. Örnek Veri Tablosu
Aşağıdaki tablo üzerinde döngü ve koşul yapılarını test edeceğiz.
Tablo Bilgisi
Bu tablo üzerinde For Next, Do While, If ve Select Case yapılarını test edeceğiz.
2. For Next Döngüsü
For Next ile belirli sayıda tekrarlama yaparız. Örnek: A sütunundaki sayıları B sütununa 2 katını yazalım.
Sub ForNextOrnek()
Dim i As Integer
For i = 2 To 6
Cells(i, 2).Value = Cells(i, 1).Value * 2
Next i
End Sub
Kod Açıklaması
- Dim i As Integer → Döngü değişkeni
- For i = 2 To 6 → 2'den 6'ya kadar döngü
- Cells(i, 2).Value = Cells(i, 1).Value * 2 → A sütunundaki sayıyı 2 ile çarp B'ye yaz
Tablo: 🟩 For Next sonuçları:
3. If Then Else Karar Yapısı
If Then Else ile koşula göre farklı işlem yaparız. Örnek: A sütunundaki sayı 5'ten büyükse "Büyük" yazalım.
Sub IfOrnek()
Dim i As Integer
For i = 2 To 6
If Cells(i, 1).Value > 5 Then
Cells(i, 2).Value = "Büyük"
Else
Cells(i, 2).Value = "Küçük"
End If
Next i
End Sub
Kod Açıklaması
- If Cells(i, 1).Value > 5 Then → A sütunundaki değer 5'ten büyük mü?
- Cells(i, 2).Value = "Büyük" → Büyükse B'ye "Büyük" yaz
- Else → Değilse
- Cells(i, 2).Value = "Küçük" → B'ye "Küçük" yaz
Tablo: 🔵 If sonuçları:
4. VBA Makroları için Ön Hazırlık
1. Geliştirici Sekmesini Aktifleştirin
Excel'de VBA kodlarını yazabilmek için önce Geliştirici sekmesini aktif etmelisiniz. Detaylı bilgi için tıklayın.
3. Modül Ekleyin
Kodlarınızı yazmak için bir Modül eklemelisiniz. Makro yazma rehberi için tıklayın.
2. Visual Basic Düzenleyici'yi Açın
Alt + F11 (Windows) veya Option + F11 (Mac) ile hızlıca açabilirsiniz.
4. Kodu Çalıştırın
Yazdığınız kodu çalıştırmak için F5 tuşuna basın veya Çalıştır butonuna tıklayın. VBA makro nedir? öğrenmek için tıklayın.
F5
▶️ Makroyu çalıştır
5. Sıkça Sorulan Sorular
01 For Next döngüsü nasıl kullanılır?
For i = 1 To 10: ... Next i şeklinde kullanılır.
02 If Then Else yapısı nasıl çalışır?
Koşul doğruysa Then, yanlışsa Else bloğu çalışır.
03 Do While ve For Next arasındaki fark nedir?
For Next sabit sayıda, Do While koşula bağlı olarak tekrarlar.
04 Select Case ne zaman kullanılır?
Birden fazla koşul kontrolünde If'ten daha okunaklıdır.
05 Mac'te VBA döngüler çalışır mı?
Evet, Mac'te de aynı kodlar çalışır.
06 Sonsuz döngü nasıl önlenir?
Döngü içinde koşulu değiştiren işlem ekleyin (ör. i = i + 1).