Cách xóa các bản sao trong Excel bằng VBA (3 phương pháp nhanh)

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

Một trong những hoạt động quan trọng nhất trong Excel là xóa các mục trùng lặp khỏi một tập dữ liệu nhất định. Hôm nay, tôi sẽ hướng dẫn cách xóa các bản sao trong Excel chỉ bằng VBA.

Tải xuống Workbook thực hành

Xóa các bản sao trong Excel bằng VBA.xlsm

3 Phương pháp nhanh để sử dụng VBA trong Excel để loại bỏ các bản trùng lặp

Ở đây chúng tôi có một tập dữ liệu với Tên, ID, Điểm, Điểm trong bài kiểm tra của một số học sinh trường mầm non Hoa Hướng Dương.

Nếu bạn xem xét kỹ , bạn sẽ thấy rằng một số tên đã bị lặp lại do nhầm lẫn.

Hôm nay, mục tiêu của chúng ta là xóa các giá trị trùng lặp bằng Excel VBA.

1. Sử dụng VBA để xóa tên trùng lặp khỏi phạm vi ô cố định

Trước hết, chúng tôi sẽ cố gắng xóa tên trùng lặp bằng cách sử dụng phạm vi ô cố định trong VBA mã.

Ở đây, tập dữ liệu của chúng tôi là phạm vi B3:E15 trong sổ làm việc (Bao gồm Tiêu đề cột ).

Chúng tôi sẽ sử dụng phạm vi ô cố định này trong mã tại đây.

Bước 1:

➤ Mở cửa sổ VBA mới và chèn mô-đun mới (Nhấp vào đây để xem cách mở và chèn mô-đun VBA mới trong Excel).

➤ Chèn mã này vào mô-đun:

Mã:

6804

➤ Nó tạo ra một Macro có tên là Remove_Duplicates . A3:E14 là phạm vi tập dữ liệu của tôi và tôi muốn xóa các hàng trùng lặp dựa trên Cột 1 . Bạnsử dụng Macro của bạn.

Bước 2:

➤ Quay lại trang tính của bạn và chạy Macro này (Nhấp vào đây để xem cách thực hiện để chạy Macro).

➤ Thao tác này sẽ xóa các hàng trùng lặp trong cột 1 ( Tên học sinh).

Đọc thêm: Cách xóa các bản sao trong Excel nhưng giữ lại một bản (7 phương pháp)

2. Chèn mã VBA để loại bỏ các giá trị trùng lặp khỏi dải ô đã chọn

Bây giờ, chúng tôi sẽ cố gắng tạo một macro có thể loại bỏ các giá trị trùng lặp khỏi bất kỳ dải ô đã chọn nào trong trang tính.

Bước 1:

➤ Mở lại cửa sổ VBA mới và chèn một mô-đun mới khác.

➤ Chèn mã này vào mô-đun:

Mã:

2575

➤ Nó tạo ra một Macro có tên là Remove_Duplicates . Tôi muốn xóa các hàng trùng lặp dựa trên Cột 1 . Bạn sử dụng cái của mình.

Bước 2:

➤ Quay lại trang tính của bạn.

➤ Chọn tập dữ liệu của bạn và chạy macro này.

➤ Nó sẽ thực thi điều tương tự như đã thực hiện ở trên. Xóa các hàng trùng lặp trong cột 1 ( Tên học sinh).

Đọc thêm: Cách xóa trùng lặp Hàng trong Excel (3 cách)

Cách đọc tương tự

  • Cách xóa các mục trùng lặp khỏi cột trong Excel (3 phương pháp)
  • Excel VBA: Xóa các giá trị trùng lặp khỏi một mảng (2 ví dụ)
  • Cách xóa các giá trị trùng lặp và giữ nguyên giá trị đầu tiên trong Excel (5 phương pháp)
  • XóaCác hàng trùng lặp ngoại trừ lần xuất hiện đầu tiên trong Excel (7 cách)
  • Cách xóa cả hai hàng trùng lặp trong Excel (5 cách dễ dàng)

3. Nhúng Macro VBA để xóa các mục trùng lặp khỏi nhiều cột

Cho đến bây giờ, chúng tôi đã xóa các hàng có các mục trùng lặp trong Cột 1 ( Tên sinh viên ).

Nhưng trên thực tế, tên của hai học sinh có thể giống nhau, không phải lúc nào hai tên giống nhau cũng có nghĩa là bị thêm nhầm.

Nhưng nếu ID của hai học sinh cũng giống nhau, thì họ là cùng một sinh viên. Sau đó, hàng sẽ bị xóa.

Lần này chúng ta sẽ phát triển một Macro sẽ xóa hàng nếu cả tên và ID của hai hàng giống nhau.

Bước 1 :

➤ Mở lại cửa sổ VBA mới và chèn một mô-đun mới khác.

➤ Chèn mã này vào mô-đun:

Mã:

9490

➤ Nó tạo ra một Macro có tên là Remove_Duplicates . Tôi muốn xóa các hàng trùng lặp dựa trên Cột 1 và 2 (Tên và ID) . Bạn sử dụng cái của mình.

Bước 2:

➤ Quay lại trang tính của bạn.

➤ Chọn tập dữ liệu của bạn và chạy macro này.

➤ Lần này, macro sẽ chỉ xóa các hàng nếu cả tên và ID sinh viên đều giống nhau.

Lưu ý: Ở đây chưa xóa Jennifer Marlo vì ID của hai học sinh khác nhau, tức là hai học sinh khác nhau.

Đọc thêm: Excel VBA: Xóa các mục trùng lặp khi so sánh nhiều cột (3 ví dụ)

Kết luận

Sử dụng các phương pháp này, bạn có thể xóa các mục trùng lặp khỏi một tập dữ liệu trong Excel bằng VBA. Làm bạn có bất kỳ vấn đề? Vui lòng hỏi chúng tôi.

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ọ.