Du kannst den … benutzen Schritt-Schlüsselwort In Excel VBA um ein anderes Inkrement für die Zählervariable einer Schleife anzugeben.
1. Platzieren Sie eine Befehlsschaltfläche in Ihrem Arbeitsblatt und fügen Sie die folgenden Codezeilen hinzu:
Dim i As Integer
Für i = 1 bis 6 Schritt 2
Zellen(i, 1).Wert = 100
Als nächstes
Ergebnis, wenn Sie auf die Befehlsschaltfläche auf dem Blatt klicken:
Erläuterung: Die Codezeilen zwischen For und Next werden dreimal ausgeführt. Für i = 1 gibt Excel VBA den Wert 100 in die Zelle am Schnittpunkt von Zeile 1 und Spalte 1 ein. Wenn Excel VBA Next i erreicht, erhöht es i um 2 und springt zurück zur For-Anweisung. Für i = 3 gibt Excel VBA den Wert 100 in die Zelle am Schnittpunkt von Zeile 3 und Spalte 1 ein usw.
2. Platzieren Sie eine Befehlsschaltfläche in Ihrem Arbeitsblatt und fügen Sie die folgenden Codezeilen hinzu:
Dim j As Integer
Für j = 8 bis 3 Schritt -1
Zellen(6, j).Wert = 50
Nächstes j
Ergebnis, wenn Sie auf die Befehlsschaltfläche auf dem Blatt klicken:
Erläuterung: Die Codezeilen zwischen For und Next werden sechsmal ausgeführt. Für j = 8 gibt Excel VBA den Wert 50 in die Zelle am Schnittpunkt von Zeile 6 und Spalte 8 ein. Wenn Excel VBA Next j erreicht, verringert es j um 1 und springt zurück zur For-Anweisung. Für j = 7 gibt Excel VBA den Wert 50 in die Zelle am Schnittpunkt von Zeile 6 und Spalte 7 ein usw.