Tìm số hàng và cột trong bảng bằng macro VBA

Mục lục

Cách sử dụng macro VBA để tìm ra bao nhiêu hàng và cột được sử dụng trong bảng Excel

Tùy thuộc vào phiên bản Excel, một số hàng và cột khác nhau được cung cấp trong bảng. Làm thế nào bạn có thể biết trong macro khi bạn muốn lặp lại trên tất cả các hàng hoặc cột của bảng?

Trong khi trong Excel cho đến và bao gồm phiên bản 2003 chỉ có 256 cột và 65.536 hàng, kể từ Excel 2007 có 16.384 cột và 1.048.576 hàng khả dụng.

Ngoài ra còn có các định dạng lưu trữ khác nhau trong Excel cho hai bảng tính khác nhau: XLS và XLSX. Tuy nhiên, không phải trường hợp tệp XLSX phải tự động có các trang tính có kích thước lớn hơn. Ngay cả trong Excel 2007 và Excel 2010, khi tệp được mở ở chế độ tương thích, chỉ có các kích thước bảng trước đó mới khả dụng.

Do đó, nếu bạn muốn xác định trong macro một trang tính có bao nhiêu hàng và cột, bạn nên truy vấn trực tiếp số này. Macro sau đây cho biết cách thực hiện việc này

Sub RowUndColumnNumber ()
MsgBox ActiveSheet.Cells.Rows.Count & "Rows" & _
ActiveSheet.Cells.Columns.Count & "Cột".
Kết thúc Sub

Nếu bạn gọi macro bằng trang tính XLS, Excel sẽ hiển thị cho bạn số hàng và cột tương ứng, như thể hiện trong hình sau:

Nếu bạn khởi động macro từ Excel 2007 hoặc Excel 2010 mà không có chế độ tương thích, một hộp thoại sẽ hiển thị cho bạn các kích thước lớn hơn của bảng:

Trong các vòng lặp VBA sẽ chạy qua tất cả các ô của bảng, do đó bạn có thể sử dụng hai thuộc tính ROWS.COUNT và COLUMNS.COUNT như được mô tả để xác định kích thước của trang tính.

Có thể mất nhiều thời gian (đặc biệt là trong Excel 2007 và Excel 2010) để chạy qua tất cả các ô có sẵn về mặt lý thuyết bằng cách sử dụng macro. Nếu bạn chỉ muốn giới hạn vòng lặp đối với khu vực được sử dụng, chúng tôi khuyên bạn nên sử dụng thuộc tính USEDRANGE để thay thế.

Để nhập macro, hãy nhấn tổ hợp phím ALT F11 trong Excel. Điều này khởi động trình soạn thảo VBA trong tất cả các phiên bản Excel. Ở đó, chọn lệnh INSERT - MODULE và nhập macro. Để bắt đầu macro, hãy kích hoạt tổ hợp phím ALT F8 trong Excel.

Bạn sẽ giúp sự phát triển của trang web, chia sẻ trang web với bạn bè

wave wave wave wave wave