Excel VBA'da `For Next` döngüsü belirli bir sayıda kodu tekrar tekrar çalıştırmak için kullanılır. Temel sözdizimi: ``` For counter = start To end [Step increment] 'kod bloğu' Next counter ``` Burada: - counter: Döngü sayacı değişkeni. - start: Sayacın başlangıç değeri. - end: Sayacın bitiş değeri. - increment: Sayacın her döngüde artırılacağı değer, varsayılan olarak 1'dir. Örnek kullanımlar: 1. Sayıları saymak: İlk sütundaki sayıları 1'den 10'a kadar yazdırmak için: ``` Sub CountNumbers() For i = 1 To 10 Cells(i, 1) = i Next i End Sub ``` 2. Sayıları toplamak: Bir sütundaki sayıların toplamını bulmak için: ``` Sub SumNumbers() Dim total As Double For i = 1 To 10 total = total + Cells(i, 1) Next i Cells(11, 1) = total End Sub ``` 3. Hücre rengini değiştirmek: Çift sayıları kırmızı renkle vurgulamak için: ``` Sub HighlightEvenNumbers() For i = 1 To 10 If Cells(i, 1) Mod 2 = 0 Then Cells(i, 1).Font.Color = RGB(255, 0, 0) 'font rengini kırmızı olarak değiştir End If Next i End Sub ```