Excel VBA: Đếm cột có dữ liệu (2 ví dụ)

  • Chia Sẻ Cái Này
Hugh West

Khi bạn có một bảng dữ liệu nhỏ với một vài cột, bạn có thể dễ dàng đếm tất cả. Nhưng đối với một bảng dữ liệu lớn, việc đếm hết các cột mà không bị lỗi là điều khá khó khăn. Ngoài ra, một số cột có thể chứa dữ liệu, trong khi một số cột có thể hoàn toàn trống. Do đó, việc đếm tất cả các cột có dữ liệu trong trường hợp bảng dữ liệu lớn là khá khó. Trong bài viết này, bạn sẽ học được 2 cách đếm cột có dữ liệu bằng VBA trong Excel một cách dễ dàng.

Tải sách bài tập thực hành

Bạn có thể tải file Excel theo link sau và thực hành cùng nó.

Đếm số cột có Data.xlsm

2 cách đếm số cột có dữ liệu bằng VBA trong Excel

1 .Đếm tất cả các cột trong một trang tính có dữ liệu bằng mã VBA đơn giản

Chúng ta có thể thấy 3 cột trong bảng dữ liệu sau. Bây giờ, chúng ta sẽ sử dụng mã VBA để xác định số lượng cột được sử dụng trong một trang tính Excel.

❶ Trước hết, hãy nhấn ALT + F11 để mở trình soạn thảo VBA.

❷ Sau đó, tạo mô-đun mới từ Chèn > Mô-đun.

❸ Sau đó sao chép tập lệnh VBA sau.

8630

❹ Sau đó quay lại trình chỉnh sửa VBA và nhấn CTRL + V để dán.

❺ Giờ hãy lưu mã VBA bằng cách nhấn nút CTRL + S .

❻ Để chạy mã VBA,  chuyển đến tab Nhà phát triển và nhấp vào Macro . Hoặc, chỉ cần nhấn F5Phím .

Hộp thoại Macro sẽ xuất hiện.

❼ Tất cả những gì bạn cần làm là nhấp vào nút Chạy .

Bây giờ bạn sẽ thấy một hộp thoại xuất hiện. Tức là số cột chứa dữ liệu là 3.

Đọc thêm: Cách đếm số cột trong Excel (3 dễ dàng Phương pháp)

2. Đếm tất cả các cột trong một phạm vi đã cho với dữ liệu bằng mã VBA của Excel

Mã VBA sau sẽ cho phép bạn đếm tất cả các cột có dữ liệu trong một phạm vi phạm vi đã cho.

Để sử dụng mã,

❶ Trước hết, hãy mở trình chỉnh sửa VBA bằng cách nhấn ALT + F11.

❷ Sau đó, hãy truy cập đến Chèn > Mô-đun để tạo mô-đun mới.

❸ Sau đó sao chép tập lệnh VBA sau.

9723

❹ Quay lại trình chỉnh sửa VBA và nhấn CTRL + V để dán.

❺ Bây giờ hãy lưu mã bằng cách nhấn CTRL + S.

❻ Chuyển đến tab Nhà phát triển và nhấn Macro để mở cửa sổ Macro .

Hoặc, bạn chỉ cần nhấn nút Phím F5 để sử dụng hộp thoại Macro .

❼ Từ hộp thoại, chọn tên hàm CountColumnsInARange và nhấn Run nút.

Cuối cùng, một hộp thoại nhỏ sẽ xuất hiện cho biết tổng số cột là 3.

Đọc thêm: Cách đếm cột cho hàm VLOOKUP trong Excel (2 phương pháp)

Các mã VBA khác để đếm cột trong Excel

1. Sử dụngPhương thức VBA Range.End trả về số cột được sử dụng lần cuối

Để lấy số cột được sử dụng lần cuối trong bảng tính Excel,

❶ Trước hết, hãy mở trình soạn thảo VBA bằng cách nhấn ALT + F11.

❷ Sau đó chuyển đến Chèn > Mô-đun để tạo mô-đun mới.

❸ Sao chép mã VBA sau:

1488

❹ Dán và lưu mã trong trình chỉnh sửa VBA.

❺ Nhấn phím F5 để chạy mã trên.

Bạn sẽ nhận được cột cuối cùng số trong hộp thoại bật lên như trong hình bên dưới:

Đọc thêm: Cách đếm các cột cho đến khi đạt giá trị trong Excel

2. Sử dụng phương thức Range.Find để trả về số cột được sử dụng lần cuối trong Excel

Nếu bạn đang tìm mã VBA để trả về số cột được sử dụng lần cuối, hãy làm theo các bước bên dưới :

❶ Trước hết, nhấn ALT + F11 để mở trình chỉnh sửa VBA.

❷ Sau đó, tạo một mô-đun mới từ Insert > Mô-đun.

❸ Sao chép mã VBA sau:

8508

❹ Sau đó quay lại trình chỉnh sửa VBA và nhấn CTRL + V để dán.

❺ Bây giờ hãy lưu mã VBA bằng cách nhấn nút CTRL + S .

Bây giờ, hãy nhấn phím F5 để chạy đoạn mã trên.

Bạn sẽ nhận được số cột được sử dụng lần cuối trong hộp thoại bật lên như trong hình bên dưới:

Những điều cần nhớ

  • Nhấn ALT + F11 để mở trình chỉnh sửa VBA.
  • Bạn có thể nhấn ALT +F8 để sử dụng hộp thoại Macro .
  • Để chạy mã VBA, nhấn F5.

Kết luận

Tóm lại, chúng ta đã thảo luận về 2 cách đếm cột có dữ liệu bằng VBA trong Excel. Bạn nên tải xuống sách bài tập thực hành đính kèm với bài viết này và thực hành tất cả các phương pháp với điều đó. Và đừng ngần ngại đặt bất kỳ câu hỏi nào trong phần bình luận bên dưới. Chúng tôi sẽ cố gắng trả lời tất cả các truy vấn có liên quan càng sớm càng tốt. Và vui lòng truy cập trang web của chúng tôi ExcelWIKI để khám phá thêm.

Hugh West là một nhà phân tích và huấn luyện viên Excel giàu kinh nghiệm với hơn 10 năm kinh nghiệm trong ngành. Ông có bằng Cử nhân Tài chính Kế toán và bằng Thạc sĩ Quản trị Kinh doanh. Hugh có niềm đam mê giảng dạy và đã phát triển một phương pháp giảng dạy độc đáo, dễ hiểu và dễ theo dõi. Kiến thức chuyên môn về Excel của ông đã giúp hàng nghìn sinh viên và chuyên gia trên toàn thế giới cải thiện kỹ năng và xuất sắc trong sự nghiệp của họ. Thông qua blog của mình, Hugh chia sẻ kiến ​​thức của mình với mọi người, cung cấp các hướng dẫn Excel miễn phí và đào tạo trực tuyến để giúp các cá nhân và doanh nghiệp phát huy hết tiềm năng của họ.