Làm cách nào để thêm đường viền bên dưới khi giá trị thay đổi trong một cột Excel?
Có một danh sách dữ liệu bao gồm các giá trị lặp lại và để phân loại các giá trị tốt hơn, tôi thêm một đường viền bên dưới khi giá trị thay đổi trong danh sách như hình minh họa bên dưới. Trong bài viết này, tôi sẽ nói về cách nhanh chóng thêm đường viền bên dưới khi giá trị thay đổi trong một cột Excel.
Thêm đường viền bên dưới khi giá trị thay đổi với VBA
Thêm đường viền bên dưới khi giá trị thay đổi với VBA
Rõ ràng là không có hàm tích hợp nào trong Excel có thể giúp bạn thêm đường viền bên dưới khi giá trị thay đổi, nhưng có một mã VBA tôi có thể giới thiệu.
1. nhấn Alt + F11 phím để kích hoạt Microsoft Visual Basic cho các ứng dụng cửa sổ.
2. nhấp chuột Chèn > Mô-đunvà dán mã bên dưới vào tập lệnh trống mô-đune.
VBA: thêm đường viền bên dưới khi giá trị thay đổi
Sub AddBorderLineWhenValueChanges()
'UpdatebyExtendoffice20160918
Application.ScreenUpdating = False
Dim LastRow As Long
Dim xrg As Range
LastRow = Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
For Each xrg In Range("A2:A" & LastRow)
If xrg <> xrg.Offset(1, 0) Then
Range("A" & xrg.Row & ":K" & xrg.Row).Borders(xlEdgeBottom).LineStyle = xlContinuous
End If
Next xrg
Application.ScreenUpdating = True
End Sub
3. nhấn F5 phím để thực thi mã. Sau đó, các đường viền đã được thêm vào bên dưới khi giá trị thay đổi trong lựa chọn A2: A.
Kutools cho Excel, với hơn 300 chức năng tiện dụng, giúp công việc của bạn dễ dàng hơn. |
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!