Code chạy Số TT nhảy cách dòng?

[lequoctrong]

Cảm ơn mọi người đã quan tâm! Cảm ơn rất nhiều khi chỉ mình code ạ!
Lẽ là đang tập tành học VBA lên Youtube coi thì thấy cái này (vòng lặp trong VBA). Xem xong thì cũng làm và sáng tạo thêm để hiểu hơn nhưng không biết nó sai chỗ nào.
Thì như trên ảnh đã trình bày. Giờ mình muốn code để nó giống trong khung màu đỏ. Nhưng làm code thì nó ra cái dòng kế bên!
Xin cảm ơn và chúc các bạn một mùa Giáng sinh vui vẻ an lành!

 

[chisinhvnn]

Cảm ơn mọi người đã quan tâm! Cảm ơn rất nhiều khi chỉ mình code ạ!
Lẽ là đang tập tành học VBA lên Youtube coi thì thấy cái này (vòng lặp trong VBA). Xem xong thì cũng làm và sáng tạo thêm để hiểu hơn nhưng không biết nó sai chỗ nào.
Thì như trên ảnh đã trình bày. Giờ mình muốn code để nó giống trong khung màu đỏ. Nhưng làm code thì nó ra cái dòng kế bên!
Xin cảm ơn và chúc các bạn một mùa Giáng sinh vui vẻ an lành!

 For a = 1 To 10 Step 2
        b = b + 1
        Cells(a, 2) = b
    Next a

 

[phulien1902]

Cảm ơn mọi người đã quan tâm! Cảm ơn rất nhiều khi chỉ mình code ạ!
Lẽ là đang tập tành học VBA lên Youtube coi thì thấy cái này (vòng lặp trong VBA). Xem xong thì cũng làm và sáng tạo thêm để hiểu hơn nhưng không biết nó sai chỗ nào.
Thì như trên ảnh đã trình bày. Giờ mình muốn code để nó giống trong khung màu đỏ. Nhưng làm code thì nó ra cái dòng kế bên!
Xin cảm ơn và chúc các bạn một mùa Giáng sinh vui vẻ an lành!

Bạn thử:

Sub abc()
    Dim a%, b%, k%
    For a = 1 To 10 Step 2
        k = k + 1
        Cells(a, 3) = k
    Next a
End Sub

 

[lequoctrong]

Xin cam on 2 ban. Close topic a!!!

 

[VetMini]

Xin cam on 2 ban. Close topic a!!!

Cơ-lô tó-bịt cái mốc xì. Đã thấy thuật toán tối ưu đâu mà coi như xong.
Lười vậy mà cũng đòi học code.

2 bạn ở bài #2 và #3: Khi ghi số thứ tự vào dòng cách quãng đều như vậy thì giữa số đếm và dòng ghi có một con toán liên hệ. Thuật toán của hai bạn không đếm xỉa đến liên hệ này.
For i = 1 to 5
Cells(i*2-1, "C") = i
Next i

 

[lequoctrong]

Cơ-lô tó-bịt cái mốc xì. Đã thấy thuật toán tối ưu đâu mà coi như xong.
Lười vậy mà cũng đòi học code.

2 bạn ở bài #2 và #3: Khi ghi số thứ tự vào dòng cách quãng đều như vậy thì giữa số đếm và dòng ghi có một con toán liên hệ. Thuật toán của hai bạn không đếm xỉa đến liên hệ này.
For i = 1 to 5
Cells(i*2-1, "C") = i
Next i

Cảm ơn Bác! Code của bác rất hay. Cảm ơn bác đã chê!