Kẻ bảng

[Minh Đức 1309]

MỌi người cho e hỏi câu lệnh tương đương với kẻ bản all bordels với ạ

 

[be_09]

View attachment 220222
MỌi người cho e hỏi câu lệnh tương đương với kẻ bản all bordels với ạ

Thử sử dụng code sau:

Sub ToVieng_TaCa_Cells()
    Sheet1.Range("A6").CurrentRegion.Borders.ColorIndex = xlNone
    Sheet1.Range("A6").CurrentRegion.Borders.ColorIndex = 56 'Màu Den
End Sub

Để tham khảo thêm đọc bài viết VBA, tô viềng trong Excel

 

[SA_DQ]

Thay vì 'Kẻ bảng' sao ta không ẩn những dòng không có dữ liệu trong bảng đã kẻ sẵn?