Hướng dẫn how do i remove repetitive text in excel? - làm cách nào để xóa văn bản lặp lại trong excel?
Tìm và xóa các bản sao Show
Excel cho Microsoft 365Excel 2021Excel 2019Excel 2016Excel 2013Excel 2010Excel 2007Excel Starter 2010 Excel 2021 Excel 2019 Excel 2016 Excel 2013 Excel 2010 Excel 2007 Excel Starter 2010 More...Less Đôi khi dữ liệu trùng lặp là hữu ích, đôi khi nó chỉ làm cho việc hiểu dữ liệu của bạn khó khăn hơn. Sử dụng định dạng có điều kiện để tìm và làm nổi bật dữ liệu trùng lặp. Bằng cách đó, bạn có thể xem lại các bản sao và quyết định xem bạn có muốn xóa chúng không.
Loại bỏ các giá trị trùng lặpKhi bạn sử dụng tính năng Xóa trùng lặp, dữ liệu trùng lặp sẽ bị xóa vĩnh viễn. Trước khi bạn xóa các bản sao, bạn nên sao chép dữ liệu gốc vào một bảng tính khác để bạn vô tình mất bất kỳ thông tin nào.Remove Duplicates feature, the duplicate data will be permanently deleted. Before you delete the duplicates, it’s a good idea to copy the original data to another worksheet so you don’t accidentally lose any information.
Cần sự giúp đỡ nhiều hơn?
Cần sự giúp đỡ nhiều hơn?Có ba cách để tìm và xóa các bản sao trong một ô trong Excel. Chỉ cần chọn một trong đó làm việc tốt nhất cho bạn. Khi nó liên quan đến việc loại bỏ các giá trị hoặc hàng trùng lặp, Microsoft Excel cung cấp một loạt các tùy chọn khác nhau. Nhưng khi nói đến việc loại bỏ văn bản giống hệt nhau trong một ô nhất định, Excel cung cấp không có gì. Không có công cụ, không có tính năng, không công thức, không có gì. Nó sẽ ngăn chúng ta đạt được mục tiêu của mình? Trong không có trường hợp. Nếu excel không có chức năng chúng ta cần, chúng ta hãy tự viết một cái :) Cách xóa các từ lặp lại trong ô ExcelVấn đề: Bạn có cùng một từ hoặc chuỗi văn bản trong một ô và muốn xóa phần thứ hai và tất cả các lần lặp lại tiếp theo. Giải pháp: Chức năng do người dùng định nghĩa hoặc macro VBA tùy chỉnh. Chức năng do người dùng xác định để loại bỏ các bản sao trong một ôĐể loại bỏ văn bản trùng lặp trong một ô, bạn có thể sử dụng hàm do người dùng (UDF) sau đây, được đặt tên là RemoveDupewords: Hàm RemoveDupewords (asstring văn bản, phân định tùy chọn asstring = "") Nếu một phần "" và từ điển RemoveDupeWords(text As String, Optional delimiter As String = " ") As String Dim dictionary As Object Dim x, part Set dictionary = CreateObject("Scripting.Dictionary") dictionary.CompareMode = vbTextCompare For Each x In Split(text, delimiter) part = Trim(x) If part <> "" And Not dictionary.Exists(part) Then dictionary.Add part, Nothing End If Next If dictionary.Count > 0 Then RemoveDupeWords = Join(dictionary.keys, delimiter) Else RemoveDupeWords = "" End If Set dictionary = Nothing End Function Cách chèn mã của chức năng vào sổ làm việc của bạnĐể thêm mã trên vào Excel của bạn, đây là những gì bạn cần làm:
Để biết thêm thông tin, vui lòng xem cách chèn mã VBA vào Excel. RemoveDupewords Chức năng Cú phápChức năng mới được tạo của chúng tôi để loại bỏ văn bản trùng lặp trong một ô có cú pháp sau: RemoveDupewords (văn bản, [DELIMITER]) Where:
Hàm không nhạy cảm với trường hợp, có nghĩa là các chữ cái chữ thường và chữ hoa được coi là cùng một ký tự.not case-sensitive, meaning that lowercase and uppercase letters are treated as the same characters. Cách sử dụng chức năng RemoveDupewordsKhi mã của chức năng được thêm vào sổ làm việc của bạn, bạn có thể sử dụng nó trong các công thức của mình giống như cách bạn sử dụng các chức năng tích hợp của Excel. Chỉ cần bắt đầu gõ tên của hàm sau dấu hiệu bằng nhau và nó sẽ xuất hiện trong công thức IntelliSense. Nhấp đúp vào chức năng và bạn sẽ được chèn vào một ô. Xác định các đối số, nhập dấu ngoặc đơn, nhấn ENTER và công thức của bạn được hoàn thành.Enter, and your formula is completed. Ví dụ, để xóa các từ trùng lặp được phân tách bằng dấu phẩy và một khoảng trống từ A2, hãy nhập công thức bên dưới trong B2, sau đó kéo nó xuống qua nhiều ô khi cần:
Kết quả là, bạn sẽ có một danh sách các từ hoặc chất nền độc đáo được phân tách bằng dấu phẩy và không gian:comma and space: Nếu bạn muốn nhận danh sách phân tách bằng dấu phẩy, thì chỉ sử dụng dấu phẩy cho dấu phân cách:only a comma for the delimiter:
Nếu dữ liệu nguồn của bạn được phân tách bằng một không gian, đối số thứ hai sẽ là "" hoặc bỏ qua:space, the second argument should be " " or omitted:
Giống như bất kỳ chức năng Excel nào khác, UDF của chúng tôi sẽ tự động tính toán lại khi dữ liệu nguồn thay đổi, do đó kết quả của bạn sẽ luôn được cập nhật. Macro VBA để xóa văn bản trùng lặp khỏi nhiều ô cùng một lúcNếu bạn đang tìm cách xóa văn bản lặp đi lặp lại khỏi nhiều ô trong một lần, thì bạn có thể gọi chức năng RemoveDupewords từ bên trong một macro. Trong trường hợp này, dấu phân cách được mã hóa cứng và bạn sẽ phải cập nhật mã macro mỗi khi dấu phân cách thay đổi. Ngoài ra, bạn có thể viết một vài biến thể mã cho các dấu phân cách phổ biến nhất, giả sử, một không gian, dấu phẩy hoặc dấu phẩy và không gian, và đặt tên có ý nghĩa macro của bạn, ví dụ: RemoveDupesDelimspace. Mã của macro như sau: Publicsub removeDupewords2 () dimer tế bào dưới dạng tế bào foreach trong application.selection cell.value = removeDupewords (cell.value, ",") nextendsub Sub RemoveDupeWords2() Dim cell As Range For Each cell In Application.Selection cell.Value = RemoveDupeWords(cell.Value, ", ") Next End Sub Trong mã trên, dấu phân cách là dấu phẩy và không gian. Để sử dụng một dấu phân cách khác, hãy thay thế "," bằng (các) ký tự khác trong dòng mã này:comma and space. To use a different delimiter, replace ", " with another character(s) in this code line:
Ghi chú. Để macro hoạt động, mã của nó và mã của RemoveDupewords phải được đặt vào cùng một mô -đun. For the macro to work, its code and the RemoveDupeWords function's code must be placed onto the same module. Cách sử dụng macroChèn mã của macro vào sổ làm việc của riêng bạn hoặc mở sổ làm việc mẫu của chúng tôi bằng mã, sau đó thực hiện các bước sau để chạy macro.
Để biết thêm chi tiết, xin vui lòng xem cách chạy macro trong Excel. Ghi chú. Vì hành động của một macro không thể hoàn tác, chúng tôi khuyên bạn nên lưu sổ làm việc của bạn ngay trước khi sử dụng macro. Bằng cách này, nếu có sự cố xảy ra, bạn có thể chỉ cần đóng lại và mở lại sổ làm việc, và bạn sẽ trở lại chính xác nơi bạn đang ở. Hoặc bạn chỉ có thể tạo một bản sao của (các) bảng tính có thể bị ảnh hưởng bởi macro. Because a macro's action cannot be undone, we strongly recommend saving your workbook right before using the macro. This way, if something goes wrong, you can simply close and reopen the workbook, and you'll be back to exactly where you were. Or you can just make a copy of the worksheet(s) that might be affected by the macro. Cách xóa các ký tự trùng lặp trong ôVấn đề: Bạn có nhiều lần xuất hiện của cùng một ký tự trong một ô, trong khi mỗi ô chỉ nên chứa một lần xuất hiện của một ký tự nhất định. Giải pháp: Chức năng do người dùng định nghĩa hoặc macro VBA tùy chỉnh. Chức năng do người dùng xác định để xóa các ký tự được lặp lạiĐể loại bỏ các ký tự được sao chép trong một ô chỉ giữ các lần xuất hiện đầu tiên, bạn có thể sử dụng chức năng do người dùng xác định sau, được đặt tên là RemoveDupechars: Chức năng RemoveDupeChars (asstring văn bản) từ điển asstringDim asObjectDim char asstringdim kết quả từ điển asstring Từ điển.Add char, không có gì kết quả = result & amp; char endifnext removeDupeChars = kết quả đặt từ điển = nothingfunction RemoveDupeChars(text As String) As String Dim dictionary As Object Dim char As String Dim result As String Set dictionary = CreateObject("Scripting.Dictionary") For i = 1 To Len(text) char = Mid(text, i, 1) If Not dictionary.Exists(char) Then dictionary.Add char, Nothing result = result & char End If Next RemoveDupeChars = result Set dictionary = Nothing End Function Để chèn mã của chức năng vào sổ làm việc của bạn, các bước hoàn toàn giống như trong ví dụ trước. RemoveDupeChars Chức năng Cú phápCú pháp của chức năng tùy chỉnh này đơn giản như nó có thể - chỉ cần một đối số: RemoveDupeChars(text) Trong đó văn bản là một chuỗi hoặc ô mà bạn muốn xóa các ký tự trùng lặp.text is a string or cell from which you wish to remove duplicate characters. Chức năng nhạy cảm trường hợp và coi chữ thường và chữ hoa là các ký tự khác nhau.case-sensitive and treats lowercase and uppercase letters as different characters. Cách sử dụng chức năng RemoveDupeCharsTất cả những gì chúng tôi nói về việc sử dụng removeDupewords là đúng đối với việc loại bỏ. Vì vậy, mà không đi quá nhiều vào lý thuyết, chúng ta hãy đi thẳng vào một ví dụ. Để xóa các ký tự trùng lặp khỏi cột A bắt đầu trong A2, hãy nhập công thức này vào B2 và sao chép nó xuống:
Như bạn có thể thấy trong hình ảnh dưới đây, chức năng xử lý thành công các loại ký tự khác nhau bao gồm các chữ cái, chữ số và ký hiệu đặc biệt: Mẹo. Nếu các nhân vật của bạn được phân tách với nhau bởi một số dấu phân cách như không gian, dấu phẩy hoặc dấu gạch nối, thì hãy sử dụng chức năng RemoveDupewords như trong ví dụ trước. If your characters are separated from each other by some delimiter such as a space, comma or hyphen, then use the RemoveDupeWords function as shown in the previous example. Macro VBA để loại bỏ các ký tự giống nhau khỏi ôGiống như RemoveDupewords, chức năng RemoveDupeChars cũng có thể được gọi từ bên trong Macro: Publicsub removeDupeChars2 () dimer tế bào dưới dạng tế bào foreach trong ứng dụng.selection cell.value = removeDupechars (cell.value) nicketend Sub RemoveDupeChars2() Dim cell As Range For Each cell In Application.Selection cell.Value = RemoveDupeChars(cell.Value) Next End Sub Vì UDF này không sử dụng bất kỳ dấu phân cách nào, bạn sẽ không phải thực hiện bất kỳ điều chỉnh nào trong mã. Ghi chú. Đối với macro hoạt động, mã của nó và mã của UDF bị loại bỏ phải được đặt vào cùng một mô -đun trong trình chỉnh sửa VBA. For the macro to work, its code and the code of RemoveDupeChars UDF must be placed onto the same module in the VBA editor. Cách sử dụng macroGiả sử bạn đã chèn mã macro vào sổ làm việc của mình hoặc mở sổ làm việc mẫu của chúng tôi chứa mã, khởi chạy macro theo cách này.
Loại bỏ các chuỗi con trùng lặp với bộ Ultimate SuiteKhi bắt đầu hướng dẫn này, người ta đã đề cập rằng Microsoft Excel không có tính năng sẵn có để loại bỏ các bản sao trong một ô. Nhưng bộ cuối cùng của chúng tôi làm! Bạn có thể tìm thấy nó trong menu thả xuống Remover trùng lặp trên tab Dữ liệu ABLEBITS, trong nhóm Dedupe. Nếu tùy chọn Xóa Sublicate Subrings không xuất hiện trong Excel của bạn, hãy đảm bảo bạn có phiên bản mới nhất của Ultimate Suite được cài đặt (có thể tải xuống bản dùng thử miễn phí tại đây).Remove Duplicate Substrings option does not appear in your Excel, make sure you have the latest version of Ultimate Suite
installed (a free trial can be downloaded here). Để xóa các từ hoặc văn bản lặp đi lặp lại khỏi nhiều ô trong 5 giây (một giây mỗi bước :), đây là những gì bạn cần làm:
Xong! Không có sự lo lắng với VBA hoặc công thức, chỉ là kết quả nhanh chóng và chính xác. Để tìm hiểu thêm về bổ trợ tuyệt vời này, vui lòng truy cập trang chủ của nó. Hoặc thậm chí tốt hơn, tải xuống một phiên bản đánh giá dưới đây và thử! Đó là cách loại bỏ văn bản trùng lặp trong một ô. Tôi cảm ơn bạn đã đọc và hy vọng sẽ gặp bạn trên blog của chúng tôi vào tuần tới! Tải xuống có sẵnVí dụ để loại bỏ các bản sao trong ô (tệp .xlsm) Ultimate Suite phiên bản đầy đủ chức năng 14 ngày (tệp .exe) Bạn cũng có thể quan tâmLàm thế nào để bạn xóa các từ lặp đi lặp lại trong excel?Làm thế nào để sử dụng macro.. Chọn một loạt các ô mà bạn muốn xóa văn bản lặp lại .. Nhấn Alt + F8 để mở hộp thoại Macro .. Trong danh sách các macro, chọn RemoveDupeword2 .. Nhấp vào Chạy .. Làm cách nào để tự động loại bỏ các bản sao trong excel?Làm thế nào để loại bỏ các bản sao trong Excel.. Chọn các ô bạn muốn loại bỏ các bản sao khỏi. Nhấp vào một ô và giữ nút chuột trái. .... Nhấp vào tab Dữ liệu trên mạng ở trên cùng .. Nhấp vào Xóa loại bỏ các bản sao để tiết lộ một cửa sổ bật lên. .... Bỏ chọn bất kỳ cột nào có dữ liệu bạn muốn giữ .. Bấm OK để xóa các bản sao .. Làm cách nào để loại bỏ các ký tự trùng lặp hoặc các từ trong ô Excel?Làm thế nào để loại bỏ văn bản trùng lặp trong một ô Excel?Chọn một phạm vi Excel, chạy Xóa các chuỗi con trùng lặp, chọn hoặc nhập các ký tự theo đó các chuỗi trùng lặp được tách ra và kiểm tra xem bạn có cần tìm kiếm nhạy cảm trường hợp không.
Làm thế nào để bạn xóa cùng một văn bản trong nhiều ô trong Excel?Loại bỏ ký tự khỏi nhiều ô bằng cách sử dụng tìm và thay thế.. Chọn một loạt các ô mà bạn muốn xóa một ký tự cụ thể .. Nhấn Ctrl + H để mở hộp thoại Tìm và thay thế .. Trong tìm hộp nào, nhập nhân vật .. Để lại hộp thay thế .. Nhấp vào Thay thế tất cả .. |