Mục lục
Trong VBA, bạn có thể sử dụng các phương pháp khác nhau để tìm hàng cuối cùng. Trong bài viết này, tôi sẽ giải thích các phương pháp khác nhau của VBA tìm hàng cuối cùng trong Excel.
Để hiển thị phần giải thích này, tôi sẽ sử dụng một tập dữ liệu mẫu. Có 4 cột trong tập dữ liệu đại diện cho thông tin bán hàng. Các cột này là Nhân viên bán hàng, Khu vực, Sản phẩm, và Giá .
Tải xuống để thực hành
VBA Tìm hàng cuối cùng.xlsm
Các cách để VBA Tìm hàng cuối cùng trong Excel
1. Sử dụng SpecialCells để Tìm Hàng Cuối cùng
Bạn có thể sử dụng phương pháp SpecialCells để tìm hàng cuối cùng bằng cách sử dụng VBA .
Trước tiên, hãy mở Developer tab >> sau đó chọn Visual Basic
Một cửa sổ mới của Microsoft Visual Basic for Applications sẽ bật lên.
Bây giờ, từ Chèn >> chọn Mô-đun
A Mô-đun sẽ được mở.
Sau đó viết đoạn mã sau vào Mô-đun .
7840
Ở đây, tôi đã tạo một thủ tục phụ có tên là LastRow_SpecialCells , trong đó loại Long của biến LastRow đã được khai báo.
Sau đó xác định biến bằng phương thức Range.SpecialCells . Ở đây, tôi đã sử dụng cột A ( A:A ) làm phạm vi. Với điều kiện xlCellTypeLastCell làm tham số loại của SpecialCells , điều này sẽ trả về ô cuối cùng cho phạm vi (trong trường hợp này, từ cột A ).
Tôi đã sử dụng hộp thông báo để hiển thị kết quả.
Sau đó, Lưu mã và quay lại trang trang tính.
Một lần nữa, hãy mở tab Chế độ xem >> từ Macro >> chọn Xem Macro
Sau đó, hộp thoại sẽ bật lên.
Bây giờ, từ Tên macro chọn LastRow_SpecialCells đồng thời chọn sổ làm việc trong Macro trong .
Cuối cùng, Chạy Macro đã chọn.
Do đó, hộp thông báo sẽ bật lên hiển thị số hàng cuối cùng.
2. Sử dụng Rows.Count cho các ô không trống
Bạn có thể sử dụng phương thức Rows.Count để tìm hàng cuối cùng bằng cách sử dụng VBA .
Bây giờ, hãy mở tab Nhà phát triển >> sau đó chọn Visual Basic
Một cửa sổ mới của Microsoft Visual Basic for Applications sẽ bật lên.
Bây giờ, từ Chèn >> chọn Mô-đun
A Mô-đun sẽ được mở.
Sau đó viết đoạn mã sau vào Module .
2829
Ở đây, tôi đã tạo một thủ tục phụ có tên là LastRow_NonEmpty, trong đó một loại biến Long LastRow đã được khai báo.
Bây giờ, CELLS(Rows.Count, 1) sẽ đếm xem có bao nhiêu hàng trong cột đầu tiên. Sau đó, sử dụng End(xlUp).Row bây giờ, thao tác này sẽ tìm hàng được sử dụng cuối cùng trong một dải ô Excel.
Cuối cùng, tôi đã sử dụng một hộp thông báo để hiển thịkết quả.
Sau đó, Lưu mã và quay lại trang tính.
Tại đây, hãy mở tab Xem >> từ Macro >> chọn Xem Macro
Bây giờ, hộp thoại sẽ bật lên.
Sau đó, từ Tên macro chọn LastRow_NonEmpty đồng thời chọn sổ làm việc trong Macro trong .
Cuối cùng, Chạy Macro đã chọn.
Do đó, hộp thông báo sẽ bật lên hiển thị số hàng cuối cùng.
3. Sử dụng Rows.Count cho bất kỳ cột được chọn nào
Bằng cách sử dụng bất kỳ cột được chọn nào trong VBA, bạn có thể tìm thấy hàng cuối cùng.
Đầu tiên , hãy mở tab Nhà phát triển >> sau đó chọn Visual Basic
Một cửa sổ mới của Microsoft Visual Basic for Applications sẽ bật lên.
Bây giờ, từ Chèn >> chọn Mô-đun
A Mô-đun sẽ được mở.
Sau đó viết đoạn mã sau vào Module .
7759
Ở đây, tôi đã tạo một thủ tục phụ có tên là LastRow_AnyColumn, trong đó một loại biến Long LastRow đã được khai báo.
Sau đó, trong Phạm vi có cột B làm tham số và cả Hàng.Đếm , điều này sẽ đếm xem có bao nhiêu hàng trong một cột nhất định B . Tiếp theo, sử dụng End(xlup). Hàng sẽ tìm thấy hàng được sử dụng cuối cùng trong một phạm vi Excel.
Cuối cùng, tôi đã sử dụng một hộp thông báo để hiển thịkết quả.
Tiếp theo, Lưu mã và quay lại trang tính.
Sau đó, mở tab Xem >> từ Macro >> chọn Xem Macro
Tại đây, hộp thoại sẽ bật lên.
Bây giờ, từ Tên macro chọn LastRow_AnyColumn đồng thời chọn sổ làm việc trong Macro trong .
Cuối cùng, Chạy Macro đã chọn.
Do đó, hộp thông báo sẽ bật lên hiển thị số hàng cuối cùng.
Cách đọc tương tự:
- Tìm trong cột trong Excel bằng VBA (7 phương pháp)
- Tìm và thay thế bằng VBA (11 Cách)
- Tìm kết quả khớp chính xác bằng VBA trong Excel (5 cách)
- Cách tìm chuỗi bằng VBA trong Excel (8 ví dụ)
4. Sử dụng Phạm vi sử dụng để tìm hàng cuối cùng
Bạn có thể sử dụng thuộc tính UsedRange của trang tính để tìm hàng cuối cùng bằng cách sử dụng VBA .
Bây giờ, hãy mở tab Nhà phát triển >> sau đó chọn Visual Basic
Sau đó, một cửa sổ mới của Microsoft Visual Basic for Applications sẽ bật lên.
Bây giờ, từ Chèn >> chọn Mô-đun
A Mô-đun sẽ được mở.
Sau đó, viết đoạn mã sau vào Mô-đun .
7937
Ở đây, tôi đã tạo một thủ tục phụ có tên là LastRow_UsedRange, trong đó một loại biến Long LastRow đã được khai báo.
Tiếp theo, xác địnhbiến bằng cách sử dụng phương thức ActiveSheet.UsedRange.Rows cũng được cung cấp ActiveSheet.UsedRange.Rows.Count làm tham số của ActiveSheet.UsedRange.Rows , điều này sẽ trả về hàng cuối cùng.
Tôi đã sử dụng hộp thông báo để hiển thị kết quả.
Bây giờ, Lưu mã và quay lại trang tính.
Sau đó, mở tab Xem >> từ Macro >> chọn Xem Macro
Tiếp theo, hộp thoại sẽ bật lên.
Sau đó, từ Macro name chọn LastRow_UsedRange đồng thời chọn sổ làm việc trong Macro trong .
Cuối cùng, Chạy Macro<5 đã chọn>.
Như vậy sẽ hiện ra hộp thông báo hiển thị số hàng cuối cùng.
5. Sử dụng Range.Find để tìm cuối cùng Hàng
Bạn có thể sử dụng phương pháp Range.Find để tìm hàng cuối cùng bằng cách sử dụng VBA .
Bây giờ, hãy mở tab Nhà phát triển >> sau đó chọn Visual Basic
Tại đây, một cửa sổ mới của Microsoft Visual Basic for Applications sẽ bật lên.
Bây giờ, từ Chèn >> chọn Mô-đun
Một Mô-đun sẽ được mở.
Sau đó viết đoạn mã sau vào Mô-đun .
8737
Ở đây, tôi đã tạo một thủ tục phụ có tên Range_Find_Method, trong đó một loại biến Long LastRow đã được khai báo .
Sau đó, xác định biến bằng phương thức Cells.Find . Ở đây, tuyên bố 7thông số. Trong What tham số tôi đã sử dụng (“*”) sẽ tìm thấy ô không trống đầu tiên. Cho A1 làm phạm vi trong tham số Sau để bắt đầu. Trong tham số LookAt được cung cấp xlPart để xem bất kỳ phần nào của văn bản bên trong ô. Tham số
LookIn:=xlFormulas sẽ tìm kiếm công thức nếu có. SearchOrder:=xlByRows tham số sẽ di chuyển từ phải sang trái và cũng lặp qua từng hàng cho đến khi tìm thấy một ô không trống.
MatchCase:=False tham số sẽ yêu cầu Find không xem xét chữ hoa hoặc chữ thường. Khi tìm thấy một ô trống, nó dừng lại và trả về số hàng.
Tôi đã sử dụng hộp thông báo để hiển thị kết quả.
Bây giờ, Lưu mã và quay lại trang tính.
Tại đây, hãy mở tab Chế độ xem >> từ Macro >> chọn Xem Macro
Bây giờ, hộp thoại sẽ bật lên.
Bây giờ, từ Tên macro chọn Range_Find_Method đồng thời chọn trang tính trong Macro trong .
Cuối cùng, Chạy Macro đã chọn.
Do đó, hộp thông báo sẽ bật lên hiển thị số hàng cuối cùng.
Kết luận
Trong bài viết này, tôi đã giải thích 5 cách để VBA tìm hàng cuối cùng trong Excel. Bạn có thể làm theo bất kỳ phương pháp nào để tìm hàng cuối cùng. Trong trường hợp bạn có bất kỳ sự nhầm lẫn hoặc câu hỏi nào liên quan đến các phương pháp này, bạn có thểbình luận xuống bên dưới.
