Μετάβαση στο κύριο περιεχόμενο

Πώς να αφαιρέσετε διπλότυπα και να αντικαταστήσετε με κενά κελιά στο Excel;

Κανονικά, όταν εφαρμόζετε την εντολή Κατάργηση διπλότυπων στο Excel, καταργεί ολόκληρες τις διπλότυπες σειρές. Αλλά μερικές φορές, θέλετε τα κενά κελιά να αντικαταστήσουν τις διπλότυπες τιμές, σε αυτήν την περίπτωση, η εντολή Κατάργηση διπλότυπου δεν θα λειτουργήσει. Αυτό το άρθρο πρόκειται να σας καθοδηγήσει να αφαιρέσετε διπλότυπα και να τα αντικαταστήσετε με κενά κελιά στο Excel.

Αφαιρέστε τα διπλά και αντικαταστήστε τα με κενά κελιά με τύπους
Καταργήστε τα διπλά και αντικαταστήστε τα με κενά κελιά με το Kutools για Excel


Αφαιρέστε τα διπλά και αντικαταστήστε τα με κενά κελιά με τύπους

Εάν υπάρχουν μερικά διπλά δεδομένα σε μια περιοχή, οι ακόλουθοι δύο τύποι θα σας καθοδηγήσουν να αντικαταστήσετε τα διπλά με κενά στην περιοχή. Κάντε τα εξής:

1. Επιλέξτε ένα κενό κελί για έξοδο του αποτελέσματος, όπως το κελί D2, εισαγάγετε τον παρακάτω τύπο και πατήστε το εισάγετε κλειδί. 

=IF(A2="","",IF(COUNTIF($A2:A15,A2)=1,A2,""))

2. Επιλέξτε το κελί αποτελεσμάτων και μετά σύρετε τη λαβή πλήρωσης στο εύρος που θέλετε να εφαρμόσετε αυτόν τον τύπο.
Στη συνέχεια, μπορείτε να δείτε όλα τα αντίγραφα (εκτός από το πρώτο) να αντικαθίστανται με κενά. Δείτε στιγμιότυπα οθόνης:

Άκρο: Εάν πρέπει να αντικαταστήσετε όλες τις διπλές τιμές (συμπεριλάβετε την πρώτη) με κενά κελιά και διατηρήσετε μόνο τις μοναδικές τιμές στο εύρος, ο παρακάτω τύπος μπορεί να σας βοηθήσει και θα λάβετε τα ακόλουθα αποτελέσματα:

=IF(A2="", "", IF(COUNTIF(A$2:A$15,A2)>1,"",A2))

Σημείωση: Μπορείτε να αλλάξετε τις αναφορές κελιών σε δύο παραπάνω τύπους με βάση τις ανάγκες σας.


Καταργήστε τα διπλά και αντικαταστήστε τα με κενά κελιά με το Kutools για Excel

Η Επιλέξτε Διπλότυπα και μοναδικά κελιά χρησιμότητα του Kutools για Excel μπορεί να σας βοηθήσει να επιλέξετε γρήγορα όλα τα διπλά κελιά σε μια περιοχή, μετά από αυτό, μπορείτε να πατήσετε μόνο το πλήκτρο Διαγραφή στο πληκτρολόγιο για να τα καταργήσετε. 

Πριν από την εφαρμογή Kutools για Excel, σας παρακαλούμε κατεβάστε και εγκαταστήστε το πρώτα.

1. Επιλέξτε το εύρος που θέλετε να εφαρμόσετε αυτό το βοηθητικό πρόγραμμα.

2. κλικ Kutools > Αγορά > Επιλέξτε Διπλότυπα και μοναδικά κελιά.

3. Στο Επιλέξτε Διπλότυπα και μοναδικά κελιά , επιλέξτε Αντίγραφα (εκτός από την 1η) or Όλα τα αντίγραφα (Συμπεριλαμβανομένου του 1ου πρώτου) όπως χρειάζεστε και, στη συνέχεια, κάντε κλικ στο OK κουμπί.

4. Εάν επιλέξατε το Αντίγραφα (εκτός από την 1η) επιλογή, όλα τα διπλά κελιά εκτός από το πρώτο διπλό θα επιλεγούν και μπορείτε να πατήσετε το Διαγραφή κλειδί για να τα αφαιρέσετε. Δείτε στιγμιότυπα οθόνης:

Εάν επιλέξατε το Όλα τα αντίγραφα (Συμπεριλαμβανομένου του 1ου πρώτου) επιλογή, όλα τα διπλά κελιά (συμπεριλαμβανομένου του πρώτου αντιγράφου) θα επιλεγούν ταυτόχρονα και, στη συνέχεια, μπορείτε να πατήσετε το Διαγραφή κλειδί για να τα αφαιρέσετε. Δείτε στιγμιότυπα οθόνης:

  Εάν θέλετε να έχετε μια δωρεάν δοκιμή (30-ημερών) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.


Σχετικά άρθρα:

Τα καλύτερα εργαλεία παραγωγικότητας γραφείου

Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

kte καρτέλα 201905


Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!

Comments (16)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
=IF(A2="","",IF(COUNTIF($A2:A15,A2)=1,A2,""))

This doesnt seem to work on Large texts cells. throws #VALUE! Errror


Any solution for that?
This comment was minimized by the moderator on the site
Is there anyway where we could keep the duplicated cell and replace value with a zero??

Say: There are 2 rows in our worksheet with 2 columns "name", "value". It should not remove the name instead replace the value with 0.

Excel 10 ------ Excel 10
Excel 10 ------ Excel 0
This comment was minimized by the moderator on the site
formula returned blank cells
This comment was minimized by the moderator on the site
This small formula also works : =IF(COUNTIF($A$2:A2,A2)=1,A2,"").. Just drag it
This comment was minimized by the moderator on the site
thankx a ton...saved a lot of tym...
This comment was minimized by the moderator on the site
You have shown formula with very clarity, Thereby I got help with easily. If you have any link in which that I can get & search mostly formula by there link. :-)
This comment was minimized by the moderator on the site
Hi, Is there any formula to remove duplicates and replace it with another values in the same sheet
This comment was minimized by the moderator on the site
Hi really need help, i having the same problem however i need the first data and clear out any succeeding duplicates. Like if i have 5 "jane" in a range, i would need 1 "jane"(the very first in line) and delete the rest. I see with the given solution that it actually delete all 5 "jane"s.
This comment was minimized by the moderator on the site
You're a genius!!!! Just saved me half a day :)
This comment was minimized by the moderator on the site
Use the following VBA code Sub RemoveDupes() Dim X As Long For X = 1 To Range("A" & Rows.Count).End(xlUp).Row If Application.WorksheetFunction.CountIf(Range("A1:A" & X), Range("A" & X).Text) > 1 Then Rows(X).ClearContents Next End Sub It works for me. Thanks to Blade Hunter [url]http://www.mrexcel.com/forum/excel-questions/768398-how-remove-duplicates-replace-blank-cells-excel.html#post3766476[/url]
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations