Làm cách nào để tự động sắp xếp cột theo giá trị trong Excel?
Ví dụ, bạn có một bảng mua hàng như ảnh chụp màn hình bên dưới. Bây giờ bạn muốn cột Giá được sắp xếp tự động khi bạn nhập số / giá mới vào cột này, bạn có thể giải quyết nó như thế nào? Ở đây tôi giới thiệu một macro VBA để giúp bạn tự động sắp xếp một cột cụ thể theo giá trị trong Excel.
Tự động sắp xếp cột theo giá trị với VBA
Tự động sắp xếp cột theo giá trị với VBA
Macro VBA này sẽ tự động sắp xếp tất cả dữ liệu trong một cột cụ thể ngay sau khi bạn nhập dữ liệu mới hoặc thay đổi giá trị trong cột trong Excel.
1. Nhấp chuột phải vào tên trang tính hiện tại trong Thanh tab trang tính, và sau đó nhấp vào Mã Chế độ xem từ menu chuột phải.
2. Trong hộp thoại mở Microsoft Visual Basic for Application, hãy dán mã macro VBA sau vào cửa sổ đang mở.
VBA: Tự động sắp xếp cột trong Excel
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("B:B")) Is Nothing Then
Range("B1").Sort Key1:=Range("B2"), _
Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, _
Orientation:=xlTopToBottom
End If
End Sub
Chú thích:
1) Trong mã vba ở trên, B: B có nghĩa là nó sẽ tự động sắp xếp Cột B, B1 là ô đầu tiên trong Cột B, B2 là ô thứ hai trong Cột B và bạn có thể thay đổi chúng dựa trên nhu cầu của mình.
2) Đoạn mã Tiêu đề: = xlYes ở hàng thứ 5 cho Excel biết rằng phạm vi bạn sẽ sắp xếp có tiêu đề, do đó hàng đầu tiên của phạm vi sẽ không được đưa vào khi sắp xếp. Nếu không có tiêu đề, vui lòng thay đổi nó thành Tiêu đề: = xlNo; và thay đổi Key1: = Phạm vi ("B2") ở hàng thứ 4 để Key1: = Phạm vi ("B1").
3. Sau đó, quay trở lại trang tính, khi bạn nhập một số mới vào cột Giá hoặc sửa đổi bất kỳ giá hiện có nào, cột Giá sẽ tự động được sắp xếp theo thứ tự tăng dần.
Chú thích: Khi nhập số mới vào cột Giá, bạn phải nhập số vào ô trống đầu tiên bên dưới các số ban đầu. Nếu có các ô trống giữa số mới nhập và các số gốc cũng như các ô trống giữa các số ban đầu, cột này sẽ không được sắp xếp tự động.
Demo: Tự động sắp xếp cột theo giá trị với VBA trong Excel
Dễ dàng sắp xếp theo tần suất xuất hiện trong Excel
Kutools cho Excel's Sắp xếp nâng cao tiện ích hỗ trợ sắp xếp dữ liệu theo độ dài văn bản, họ, giá trị tuyệt đối, tần suất, ... trong Excel một cách nhanh chóng.
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!