Link tải file mẫu : Tại đây
Hoạt động : Bạn chọn vùng cần đánh dấu ( Range ) -> sau đó ấn nút Start -> Macro sẽ kiểm tra các dòng trong vùng chọn nếu dòng là lẻ ( chia cho 2 dư 1 ) thì đánh dấu màu vào dòng đó.
Ứng dụng : Đánh dấu màu dữ liệu theo yêu cầu phân biệt dòng lẻ , dòng chẵn để tra cứu…
Code
‘This code would highlight alternate rows in the selection
Sub HighlightAlternateRows()
Dim Myrange As Range
Dim Myrow As Range
Set Myrange = Selection
For Each Myrow In Myrange.Rows
If Myrow.Row Mod 2 = 1 Then
Myrow.Interior.Color = vbCyan
End If
Next Myrow
End Sub
DienDan.Edu.Vn Cám ơn bạn đã quan tâm và rất vui vì bài viết đã đem lại thông tin hữu ích cho bạn.DienDan.Edu.Vn! là một website với tiêu chí chia sẻ thông tin,... Bạn có thể nhận xét, bổ sung hay yêu cầu hướng dẫn liên quan đến bài viết. Vậy nên đề nghị các bạn cũng không quảng cáo trong comment này ngoại trừ trong chính phần tên của bạn.Cám ơn.
