Bạn có thể sử dụng từ khóa Step trong Excel VBA để chỉ định một số gia khác cho biến bộ đếm của một vòng lặp.

  1. Đặt nút lệnh

trên trang tính của bạn và thêm các dòng mã sau:

Dim i As Integer

For i = 1 To 6 Step 2

Cells(i, 1).Value = 100

Next i

Kết quả khi bạn bấm vào nút lệnh trên sheet:

Positive Step

Giải thích: Các dòng mã giữa For và Next sẽ được thực thi ba lần. Đối với i = 1, Excel VBA nhập giá trị 100 vào ô ở giao điểm của hàng 1 và cột 1. Khi Excel VBA đến Tiếp theo i, nó tăng i với 2 và nhảy trở lại câu lệnh For. Đối với i = 3, Excel VBA nhập giá trị 100 vào ô ở giao điểm của hàng 3 và cột 1, v.v.

  1. Đặt nút lệnh

trên trang tính của bạn và thêm các dòng mã sau:

Dim j As Integer

For j = 8 To 3 Step -1

Cells(6, j).Value = 50

Next j

Kết quả khi bạn bấm vào nút lệnh trên sheet:

Negative Step

Giải thích: Các dòng mã giữa For và Next sẽ được thực thi sáu lần. Đối với j = 8, Excel VBA nhập giá trị 50 vào ô ở giao điểm của hàng 6 và cột 8. Khi Excel VBA đến Tiếp theo j, nó giảm j bằng 1 và nhảy trở lại câu lệnh For. Đối với j = 7, Excel VBA nhập giá trị 50 vào ô ở giao điểm của hàng 6 và cột 7, v.v.