Excel VBA xóa các hàng trùng lặp giữ trước

Khi định hình dữ liệu, một nhiệm vụ phổ biến là giữ hoặc xóa các hàng trùng lặp. Kết quả dựa trên cột bạn chọn làm phép so sánh để xác định giá trị trùng lặp dựa trên dữ liệu đã chọn

Xóa các hàng trùng lặp

  1. Để mở một truy vấn, hãy định vị truy vấn đã tải trước đó từ Power Query Editor, chọn một ô trong dữ liệu rồi chọn Truy vấn > Chỉnh sửa. Để biết thêm thông tin, hãy xem Tạo, tải hoặc chỉnh sửa truy vấn trong Excel

  2. Chọn một cột bằng cách nhấp vào tiêu đề cột. Để chọn nhiều cột liên tục hoặc không liên tục, hãy nhấn Shift+Click hoặc CTRL+Click vào từng cột tiếp theo

    Mã VBA để loại bỏ các hàng trùng lặp trong Excel. Macro ví dụ để xóa các bản ghi trùng lặp khỏi trang tính trong MS Excel 2003, 2007, 2010, 2013. Ví dụ để chỉ cho bạn cách xóa các bản ghi trùng lặp khỏi Bảng tính Excel. Chúng ta cũng sẽ xem ví dụ về xóa trùng lặp cho dữ liệu có và không có tiêu đề cột

    Excel VBA xóa các hàng trùng lặp giữ trước

    Bạn được tự do sử dụng hình ảnh này trên trang web, mẫu của mình, v.v. , Vui lòng cung cấp cho chúng tôi liên kết ghi công Làm cách nào để cung cấp ghi nhận tác giả?Liên kết bài viết được siêu liên kết
    ví dụ
    Nguồn. VBA Xóa trùng lặp (wallstreetmojo. com)

    Làm cách nào để loại bỏ các giá trị trùng lặp trong mã hóa VBA?

    Để loại bỏ các giá trị trùng lặp, trước tiên, chúng ta cần đề cập đến phạm vi mà chúng ta đang đề cập đến. Sau đó, chúng ta có thể truy cập phương thức “Remove Duplicates”. Vì vậy, cú pháp sẽ như sau

    Excel VBA xóa các hàng trùng lặp giữ trước

    [Cột]. Cột lựa chọn nào chúng ta cần loại bỏ trùng lặp?

    [Tiêu đề]. Phạm vi bạn đã chọn có tiêu đề hay không. Vì vậy, chúng tôi có ba tùy chọn để làm việc với ở đây

    • xlCó. Nếu dữ liệu có tiêu đề, thì bạn có thể chọn cái này
    • xlKhông. Nếu dữ liệu không có tiêu đề, bạn có thể chọn cái này
    • xlĐoán. Tùy chọn này sẽ cho phép Excel đoán tiêu đề dữ liệu

    Vì vậy, bằng cách sử dụng các tham số này, chúng tôi có thể xóa các bản sao chỉ bằng một lần nhấp vào nút mà không làm đổ mồ hôi

    Trong phần bên dưới, chúng tôi sẽ hiển thị các ví dụ về VBA Ví dụ về VBADưới đây là danh sách . In tất cả tên trang tính, chèn chỉ mục màu khác nhau trong VBA, chèn trang tính nhiều như bạn muốn, chèn hàng trống sau mỗi hàng khác tô sáng lỗi chính tả. đọc thêm xóa trùng lặp. Làm theo các bước cẩn thận để tự viết mã.

    Ví dụ về loại bỏ các giá trị trùng lặp trong mã hóa VBA

    Dưới đây là các ví dụ về RemoveDuplicate trong Values ​​VBA

    VBA Loại bỏ trùng lặp – Ví dụ #1

    Xem xét dữ liệu dưới đây cho ví dụ này

    Excel VBA xóa các hàng trùng lặp giữ trước

    Chúng tôi cần xóa các bản sao cột "Vùng" khỏi dữ liệu trên, vì vậy hãy làm theo các bước bên dưới để viết mã

    Bước 1. Bắt đầu thủ tục phụ bằng cách đặt tên mã Macro

    Bước 2. Đề cập đến phạm vi dữ liệu bằng cách sử dụng đối tượng VBA Range

    Mã số

    Sub Remove_Duplicates_Example1()
    
      Range ("A1:C9").
    
    End Sub
    Excel VBA xóa các hàng trùng lặp giữ trước

    Bước 3. Sau khi đề cập đến phạm vi truy cập phương thức VBA “RemoveDuplicates”.

    Mã số

    Sub Remove_Duplicates_Example1()
    
      Range("A1:C9").RemoveDuplicates
    
    End Sub
    Excel VBA xóa các hàng trùng lặp giữ trước

    Bước 4. Đối số đầu tiên trong cột nào chúng ta cần xóa các giá trị trùng lặp. Trong ví dụ này, chúng ta cần xóa các bản sao khỏi cột đầu tiên.

    Mã số

    Sub Remove_Duplicates_Example1()
    
      Range("A1:C9").RemoveDuplicates Columns:=1,
    
    End Sub
    Excel VBA xóa các hàng trùng lặp giữ trước

    Bước 5. Điều tiếp theo là liệu dữ liệu có tiêu đề hay không. Trong trường hợp này, chúng tôi có các tiêu đề, vì vậy hãy chọn “xlYes. ”

    Mã số

    Sub Remove_Duplicates_Example1()
    
      Range("A1:C9").RemoveDuplicates Columns:=1, Header:=xlYes
    
    End Sub
    Excel VBA xóa các hàng trùng lặp giữ trước

    Chạy mã này. Nó sẽ xóa các bản sao khỏi vùng đã chọn.

    Excel VBA xóa các hàng trùng lặp giữ trước

    Đó là một cách đơn giản để đề cập đến phạm vi ô. Tuy nhiên, nếu bạn muốn tự mình chọn phạm vi và loại bỏ các giá trị trùng lặp thì chúng ta cần sử dụng biến để làm việc với. Trong ví dụ dưới đây, chúng tôi sẽ hướng dẫn bạn cách sử dụng biến trong VBA

    VBA Loại bỏ trùng lặp – Ví dụ #2

    Trong ví dụ trên, chúng tôi đã cung cấp cụ thể phạm vi ô. Bây giờ, chúng ta sẽ xem cách làm việc với việc chọn các ô của chúng ta

    Ví dụ: chúng tôi có một vài bộ dữ liệu, như trong hình bên dưới

    Excel VBA xóa các hàng trùng lặp giữ trước

    Chúng tôi không thể chỉ định rõ ràng phạm vi ô vì vậy chúng tôi sẽ chỉ định lựa chọn là phạm vi

    Bước 1. Khai báo biến là Phạm vi

    Mã số

    Sub Remove_Duplicates_Example2()
    
      Dim Rng As Range
    
    End Sub
    Excel VBA xóa các hàng trùng lặp giữ trước

    Bước 2. Phạm vi là một đối tượng. Chúng tôi sẽ đặt phạm vi làm lựa chọn của mình.

    Mã số

    Sub Remove_Duplicates_Example2()
    
      Dim Rng As Range
      
      Set Rng = Selection
    
    End Sub
    Excel VBA xóa các hàng trùng lặp giữ trước

    Bước 3. Thay vì một dãy ô, chúng ta có thể sử dụng biến “rng. ”

    Mã số

    Sub Remove_Duplicates_Example2()
    
      Dim Rng As Range
    
      Set Rng = Selection
    
      Rng.RemoveDuplicates Columns:=1, Header:=xlYes
    
    End Sub
    Excel VBA xóa các hàng trùng lặp giữ trước

    Trước khi chạy mã, chúng ta phải chọn dãy ô trước. Sau đó, chúng tôi có thể xóa các bản sao khỏi phạm vi ô đã chọn.

    Excel VBA xóa các hàng trùng lặp giữ trước

    VBA Xóa các bản sao khỏi nhiều cột - Ví dụ #3

    Chúng ta cũng có thể sử dụng VBA để xóa các giá trị trùng lặp khỏi cột excel Xóa giá trị trùng lặp khỏi cột Excel . Sử dụng nhóm công cụ dữ liệu, Sử dụng bộ lọc nâng cao trong excel, Định dạng có điều kiện trong excel. đọc thêm . Cuối cùng, chúng ta cần sử dụng một mảng để loại bỏ nhiều cột và đề cập đến số cột.

    Ví dụ: nhìn vào hình ảnh dữ liệu ví dụ

    Excel VBA xóa các hàng trùng lặp giữ trước

    Chúng tôi có các giá trị trùng lặp trong cột đầu tiên và cột thứ tư. Vì vậy, chúng tôi sẽ loại bỏ các cột này. Sử dụng đoạn mã dưới đây để VBA loại bỏ các bản sao

    Mã số

    Sub Remove_Duplicates_Example3()
    
      Dim Rng As Range
      Set Rng = Range("A1:D9")
    
      Rng.RemoveDuplicates Columns:=Array(1, 4), Header:=xlYes
    
    End Sub

    Bạn có thể tải VBA Remove Duplicates Excel này tại đây. VBA Xóa mẫu Excel trùng lặp

    Bài viết được đề xuất

    Bài viết này đã hướng dẫn VBA Remove Duplicates. Ở đây, chúng ta tìm hiểu cách xóa các giá trị trùng lặp trong Excel VBA, ví dụ và tải xuống mẫu Excel. Dưới đây là một số bài viết Excel hữu ích liên quan đến VBA. –

    • VBA Like VBA LikeVBA Like là toán tử so sánh khớp với một mẫu bằng cách so sánh một chuỗi đã cho làm đối số trong một tập hợp các chuỗi. đọc thêm
    • Bảng tổng hợp VBA Bảng tổng hợp VBABảng tổng hợp là trung tâm của việc tóm tắt một lượng lớn dữ liệu. Chúng tôi cũng có thể sử dụng mã hóa VBA để tự động hóa quá trình tạo bảng tổng hợp. đọc thêm
    • Tìm giá trị trùng lặp trong Excel Tìm giá trị trùng lặp trong ExcelTrong MS Excel, có thể tìm thấy và xóa các giá trị trùng lặp khỏi tập dữ liệu. Tùy thuộc vào dữ liệu và yêu cầu của bạn, các phương pháp được sử dụng phổ biến nhất là tính năng định dạng có điều kiện hoặc công thức COUNTIF để tìm và đánh dấu các mục trùng lặp cho một số lần xuất hiện cụ thể. Các cột của tập dữ liệu sau đó có thể được lọc để xem các giá trị trùng lặp. đọc thêm
    • Đánh dấu các ô trùng lặp trong Excel Đánh dấu các ô trùng lặp trong ExcelCó thể sử dụng Quy tắc tô sáng các ô, sẵn có trong Định dạng có điều kiện trong tab Menu chính .

      Làm cách nào để loại bỏ các bản sao nhưng vẫn giữ phiên bản đầu tiên trong Excel VBA?

      Làm cách nào để xóa các bản sao trong Excel nhưng vẫn giữ lại một bản? .
      Chọn một ô trong tập dữ liệu của bạn và chuyển đến Dữ liệu > Bộ lọc nâng cao ở ngoài cùng bên phải. .
      Chọn “Lọc danh sách, tại chỗ” hoặc “Sao chép sang vị trí khác”. .
      Đánh dấu vào ô “Chỉ các bản ghi duy nhất” để giữ các giá trị duy nhất và sau đó “OK” để xóa tất cả các bản ghi trùng lặp

      Làm cách nào để xóa các hàng trùng lặp nhưng giữ lại hàng có ngày mới nhất trong Excel VBA?

      1 câu trả lời .
      Thiết lập một cột trợ giúp và điền vào đó các giá trị số. .
      Đảm bảo cột ngày của bạn được định dạng là ngày và Excel nhận ra chúng là ngày. .
      Chọn Sắp xếp tùy chỉnh (tùy thuộc vào phiên bản Excel của bạn). .
      Sử dụng Xóa các mục trùng lặp và chỉ chọn cột Số chứa tiêu chí của bạn để kiểm tra các mục trùng lặp

      Làm cách nào để giữ lại vị trí hàng khi xóa các giá trị trùng lặp?

      Lại. Làm cách nào để giữ lại vị trí hàng khi xóa các giá trị trùng lặp? .
      - Đầu tiên sắp xếp cột chứa các giá trị trùng lặp theo thứ tự tăng dần
      - Đặt một cột trợ giúp với một số tên nói "bộ lọc" bên cạnh cột trên
      - Đặt số 0 vào ô đầu tiên của cột trợ giúp ở trên