Chọn mẫu trong excel (1 người xem)

[lakoda]

Trong 1 file excel mình muốn chọn mẫu theo kiểu như sau:

Ban đầu chọn ngầu nhiên một ô bất kỳ và đánh dấu là 1 (B2=1). Tiếp sau đó cứ khoảng cách là 4 dòng tiếp theo lại đánh dấu là 1, cứ thế cho đến hết

e đính kèm file ví dụ, nhờ các bác chỉ giúp

Thank!

 

[phulien1902]

Trong 1 file excel mình muốn chọn mẫu theo kiểu như sau:

Ban đầu chọn ngầu nhiên một ô bất kỳ và đánh dấu là 1 (B2=1). Tiếp sau đó cứ khoảng cách là 4 dòng tiếp theo lại đánh dấu là 1, cứ thế cho đến hết

e đính kèm file ví dụ, nhờ các bác chỉ giúp

Thank!

Bạn tham khảo:

Sub ABC()
    Dim i As Long, lr As Long
    lr = Range("A" & Rows.Count).End(xlUp).Row
    For i = 2 To lr Step 4
        Range("B" & i) = 1
    Next i
End Sub

 

[lakoda]

Bạn tham khảo:

Sub ABC()
    Dim i As Long, lr As Long
    lr = Range("A" & Rows.Count).End(xlUp).Row
    For i = 2 To lr Step 4
        Range("B" & i) = 1
    Next i
End Sub

Cảm ơn bạn, mình làm dc rồi