Πίνακας περιεχομένων
Στο Microsoft Excel, είναι τόσο συνηθισμένο να βρίσκουμε την ανάγκη να διαγράψουμε διπλές γραμμές με βάση μια στήλη. Μπορούμε να εισάγουμε τύπους, να εφαρμόσουμε εργαλεία που εμφανίζονται ή να χρησιμοποιήσουμε κωδικούς VBA για να εξυπηρετήσουμε τους σκοπούς. Σε αυτό το άρθρο, θα γνωρίσετε όλες τις ταχύτερες τεχνικές για τη διαγραφή διπλών γραμμών με βάση μια μόνο στήλη μόνο με κατάλληλα παραδείγματα και εικόνες.
Κατεβάστε το βιβλίο ασκήσεων
Μπορείτε να κατεβάσετε το ακόλουθο βιβλίο Excel που χρησιμοποιήσαμε για την προετοιμασία αυτού του άρθρου.
Αφαίρεση διπλών σειρών με βάση μία Column.xlsm3 κατάλληλες μέθοδοι για την αφαίρεση διπλών σειρών με βάση μια στήλη στο Excel
1. Χρησιμοποιήστε το εργαλείο "Αφαίρεση αντιγράφων" στο φύλλο Excel
Ας γνωρίσουμε πρώτα το σύνολο δεδομένων. Ο παρακάτω πίνακας ή συνομιλία αντιπροσωπεύει ορισμένα λεπτομερή δεδομένα για ένα φιλανθρωπικό ταμείο. Οι αντίστοιχες στήλες βρίσκονται με διάφορα ονόματα δωρητών, τα ποσά των δωρεών τους, τις ημερομηνίες δωρεάς και τα μέσα των δωρεών τους.
Αυτό που θα κάνουμε εδώ είναι να αφαιρέσουμε τις διπλές γραμμές με βάση μόνο τα ονόματα των δωρητών. Αυτό σημαίνει ότι θα φιλτράρουμε τα ονόματα των δωρητών και θα εξάγουμε κάθε μοναδικό όνομα μαζί με τις αντίστοιχες γραμμές μόνο από τις πρώτες εμφανίσεις τους.
📌 Βήμα 1:
➤ Επιλέξτε πρώτα ολόκληρο τον πίνακα.
➤ Κάτω από το Δεδομένα καρτέλα ή κορδέλα, επιλέξτε το Αφαίρεση αντιγράφων εργαλείο από το Εργαλεία δεδομένων drop-down.
📌 Βήμα 2:
➤ Θα εμφανιστεί ένα παράθυρο διαλόγου. Στήλες επιλογές, βάλτε ένα τσεκάρισμα στο Δωρητής και αφήστε τις άλλες επιλογές χωρίς σημάδια.
➤ Τύπος OK .
Και θα βρείτε τις ακόλουθες εξόδους με ένα αναδυόμενο μήνυμα που δείχνει την κατάσταση των τιμών επιστροφής.
Κάντε κλικ στο OK και τώρα βλέπετε τα φιλτραρισμένα δεδομένα με διαγραμμένες όλες τις διπλές γραμμές.
Διαβάστε περισσότερα: Πώς να αφαιρέσετε διπλές γραμμές στο Excel
2. Εφαρμογή επιλογών φίλτρου για την αφαίρεση αντιγράφων με βάση μία στήλη
Τώρα θα χρησιμοποιήστε τη συνάρτηση COUNTIF για να βρείτε τον αριθμό των αντιγράφων με βάση μια συνθήκη και τα αποτελέσματα θα εμφανιστούν κάτω από το παράθυρο Διπλότυπα επικεφαλίδα σε Στήλη ΣΤ Στη συνέχεια θα εφαρμόσουμε το Φίλτρο σε όλες τις επικεφαλίδες του πίνακα δεδομένων και να φιλτράρει τις διπλές γραμμές ανάλογα με τις εξόδους από το COUNTIF λειτουργία.
📌 Βήμα 1:
➤ Σε Κελί F5 , πληκτρολογήστε τον ακόλουθο τύπο:
=COUNTIF($B$5:$B5,B5) 
📌 Βήμα 2:
➤ Τύπος Εισάγετε το και θα λάβετε την πρώτη έξοδο.
➤ Χρησιμοποιήστε το Χειρολαβή πλήρωσης για να σύρετε προς τα κάτω ολόκληρη τη στήλη και τις τιμές περισσότερο από '1' θα υπολογίζονται ως αντίγραφα.
📌 Βήμα 3:
➤ Τώρα επιλέξτε ολόκληρο τον πίνακα.
➤ Κάτω από το Αρχική σελίδα επιλέξτε την καρτέλα Φίλτρο εντολή από το Ταξινόμηση & φίλτρο drop-down στο Επεξεργασία ομάδα εντολών.
Θα έχουμε τα κουμπιά φίλτρων που αντιστοιχούν σε όλες τις επικεφαλίδες στον ακόλουθο πίνακα δεδομένων.
📌 Βήμα 4:
➤ Κάντε κλικ στο πτυσσόμενο πλαίσιο στο Διπλότυπα και θα ανοίξουν οι επιλογές φίλτρου για την αντίστοιχη στήλη.
➤ Κάτω από το Επιλέξτε όλα αποεπιλέξτε την επιλογή '1' .
➤ Τύπος OK και τελειώσατε.
Θα βρείτε τις διπλές γραμμές όπως φαίνεται παρακάτω.
📌 Βήμα 5:
➤ Τώρα διαγράψτε όλες τις διπλές γραμμές που περιέχουν το σύνολο των δεδομένων.
📌 Βήμα 6:
➤ Ανοίξτε ξανά τις επιλογές φίλτρου από το Διπλότυπα επικεφαλίδα σε Στήλη ΣΤ .
➤ Βάλτε ένα τσεκ στην επιλογή '1' μόνο.
➤ Τύπος OK για τελευταία φορά.
Τελικά, θα λάβετε όλες τις μοναδικές γραμμές, όπως φαίνεται στην παρακάτω εικόνα. Τώρα μπορείτε να αφαιρέσετε τα κουμπιά φίλτρου από τις επικεφαλίδες και τα δεδομένα που θα προκύψουν θα είναι τα ίδια, καθώς έχουμε ήδη διαγράψει τις διπλές γραμμές.
Διαβάστε περισσότερα: Πώς να αφαιρέσετε διπλότυπα με βάση κριτήρια στο Excel
3. Εκτέλεση κωδικών VBA για την αφαίρεση αντιγράφων με βάση μία στήλη στο Excel
Στην τελική μας μέθοδο, θα εισαγωγή ορισμένων κωδικών VBA για να ορίσετε μια μακροεντολή που θα αφαιρεί τα αντίγραφα με βάση την πρώτη στήλη.
📌 Βήμα 1:
➤ Κάντε δεξί κλικ στο Φύλλο όνομα (Φύλλο3) πρώτα και θα βρείτε μερικά Φύλλο επιλογές.
➤ Επιλέξτε Προβολή κωδικού .
A VBA θα εμφανιστεί το παράθυρο όπου θα πρέπει να εισάγουμε τους κωδικούς.
📌 Βήμα 2:
➤ Στο VBA παράθυρο, επικολλήστε τους ακόλουθους κωδικούς:
Option Explicit Sub Remove_Duplicate_Rows() Dim Rng As Range Set Rng = Selection Rng.RemoveDuplicates Columns:=Array(1), Header:=xlYes End Sub 
📌 Βήμα 3:
➤ Επιστροφή στο Excel φύλλο τώρα.
➤ Επιλέξτε ολόκληρο τον πίνακα δεδομένων.
➤ Από το Προγραμματιστής καρτέλα, πατήστε το πλήκτρο Μακροεντολές εντολή.
📌 Βήμα 4:
➤ Στο Μάκρο παράθυρο, το Μάκρο όνομα θα εκχωρηθεί αυτόματα.
➤ Κάντε κλικ Εκτέλεση και τελειώσατε με τα βήματα.
Όπως στο παρακάτω στιγμιότυπο, θα βρούμε τις μοναδικές γραμμές μόνο με βάση την πρώτη στήλη. Και οι διπλές γραμμές θα εξαφανιστούν αμέσως.
Διαβάστε περισσότερα: Πώς να αφαιρέσετε διπλότυπα στο Excel χρησιμοποιώντας την VBA
Καταληκτικά λόγια
Ελπίζω ότι όλες αυτές οι απλές μέθοδοι που αναφέρθηκαν παραπάνω θα σας βοηθήσουν τώρα να τις εφαρμόσετε στα φύλλα του Excel όταν πρέπει να αφαιρέσετε διπλές γραμμές και να βρείτε μόνο μοναδικές γραμμές. Εάν έχετε οποιεσδήποτε ερωτήσεις ή σχόλια, ενημερώστε με στην ενότητα σχολίων. Ή μπορείτε να δείτε τα άλλα άρθρα μας σχετικά με τις συναρτήσεις του Excel σε αυτόν τον ιστότοπο.
