khi nào bạn thấy những giá trị ở đầu nó lặp lại nhiều lần như phần bạn kẻ khung chằng hạn
Thường bạn sẽ viết như sau
Selection.Borders(xlEdgeLeft) .LineStyle = xlContinuous
Selection.Borders(xlEdgeLeft) .ColorIndex = 0
Selection.Borders(xlEdgeLeft) .TintAndShade = 0
Selection.Borders(xlEdgeLeft) .Weight = xlThin
Thêm with thì gọn như sau
With Selection.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
Nghĩa là cấu trúc with và end with sẽ phục vụ cho việc sử lý những giá trị giống nhau