1. The Manual Way
1. Επιλέξτε το εύρος των κελιών που περιέχουν τα διπλότυπα δεδομένα.
2. Κάντε κλικ στην καρτέλα "Δεδομένα" στην κορδέλα του Excel.
3. Στην ομάδα "Εργαλεία δεδομένων", κάντε κλικ στο κουμπί "Κατάργηση διπλότυπων".
4. Στο πλαίσιο διαλόγου "Κατάργηση διπλότυπων", επιλέξτε τις στήλες από τις οποίες θέλετε να αφαιρέσετε τα διπλότυπα.
5. Κάντε κλικ στο κουμπί "OK".
2. The Using a Formula Way
1. Σε μια κενή στήλη δίπλα στη στήλη που περιέχει τα διπλά δεδομένα, εισαγάγετε τον ακόλουθο τύπο:
```
=IF(COUNTIF($A$2:$A$10,A2)=1,A2,"")
```
Όπου $A$2:$A$10 είναι το εύρος των κελιών που περιέχει τα διπλότυπα δεδομένα και το A2 είναι το κελί στο οποίο θέλετε να εμφανίζεται το αποτέλεσμα του τύπου.
2. Σύρετε τον τύπο προς τα κάτω στη στήλη για να τον αντιγράψετε στα υπόλοιπα κελιά.
3. Επιλέξτε τα κελιά που περιέχουν τους τύπους.
4. Πατήστε Ctrl+C κλειδιά για την αντιγραφή των κελιών.
5. Επιλέξτε τα κελιά που περιέχουν τα διπλότυπα δεδομένα και πατήστε Ctrl+V κλειδιά για να επικολλήσετε τους τύπους πάνω τους.
6. Πατήστε το Enter κλειδί για την εκτέλεση των τύπων.
7. Επιλέξτε τα κελιά που περιέχουν τα διπλά δεδομένα και κάντε κλικ στο πλήκτρο «Διαγραφή» για να τα αφαιρέσετε.
3. Χρήση μακροεντολής VBA
1. Ανοίξτε το Microsoft Excel Visual Basic Editor πατώντας το Alt+F11 κλειδιά.
2. Στο παράθυρο "Project Explorer", κάντε διπλό κλικ στο αντικείμενο "ThisWorkbook" για να ανοίξετε το παράθυρο κώδικα.
3. Αντιγράψτε τον ακόλουθο κώδικα στο παράθυρο κώδικα:
```
Sub RemoveDuplicates()
Dim r As Range
Dim c Ως εύρος
Για κάθε r στο ActiveSheet.UsedRange
Για κάθε c In r.Offset(, 1).Αλλαγή μεγέθους(r.Rows.Count, 1)
Αν r.Value =c.Value Τότε
γ.Διαγραφή
Τέλος Αν
Επόμενο γ
Επόμενο r
MsgBox "Τα διπλότυπα έχουν αφαιρεθεί."
End Sub
```
4. Πατήστε το F5 κλειδί για την εκτέλεση της μακροεντολής.
5. Τα διπλότυπα θα αφαιρεθούν από το ενεργό φύλλο εργασίας.
Θυμηθείτε να δημιουργείτε πάντα ένα αντίγραφο των δεδομένων σας πριν αφαιρέσετε τα διπλότυπα. Αυτό γίνεται για να διασφαλίσετε ότι μπορείτε να ανακτήσετε τα δεδομένα εάν κάτι πάει στραβά.
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα