Làm thế nào để chọn một cột dựa trên tiêu đề cột trong Excel?
Giả sử, bạn có một trang tính lớn chứa nhiều cột và bây giờ, bạn muốn chọn cột cụ thể dựa trên tên tiêu đề cột. Để tìm từng cột trong một trang tính lớn sẽ lãng phí nhiều thời gian, bài viết này, tôi sẽ giới thiệu một phương pháp nhanh chóng để giải quyết công việc này trong Excel.
Chọn một cột dựa trên tên tiêu đề cột với mã VBA
Chọn một cột dựa trên tên tiêu đề cột với mã VBA
Mã VBA sau có thể giúp bạn chọn các cột dựa trên tên tiêu đề cụ thể, vui lòng làm như sau:
1. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
2. Nhấp chuột Chèn > Mô-đunvà dán mã sau vào Mô-đun Cửa sổ.
Mã VBA: Chọn cột dựa trên tên tiêu đề cột:
Sub FindAddressColumn()
'Updateby Extendoffcie
Dim xRg As Range
Dim xRgUni As Range
Dim xFirstAddress As String
Dim xStr As String
On Error Resume Next
xStr = "Name"
Set xRg = Range("A1:P1").Find(xStr, , xlValues, xlWhole, , , True)
If Not xRg Is Nothing Then
xFirstAddress = xRg.Address
Do
Set xRg = Range("A1:P1").FindNext(xRg)
If xRgUni Is Nothing Then
Set xRgUni = xRg
Else
Set xRgUni = Application.Union(xRgUni, xRg)
End If
Loop While (Not xRg Is Nothing) And (xRg.Address <> xFirstAddress)
End If
xRgUni.EntireColumn.Select
End Sub
Chú thích: Trong đoạn mã trên, A1: P1 là phạm vi tiêu đề mà bạn muốn chọn cột và “Họ tên”Trong kịch bản xStr = "Tên" là tên tiêu đề mà bạn muốn chọn các cột dựa trên. Vui lòng thay đổi chúng theo nhu cầu của bạn.
3. Sau khi sao chép và dán mã, vui lòng nhấn F5 để chạy mã này và tất cả các cột có tên tiêu đề cụ thể đã được chọn cùng một lúc, hãy xem ảnh chụp màn hình:
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!