2 Μέθοδοι αντιγραφής κελιών βάσει συγκεκριμένων κριτηρίων στο φύλλο εργασίας του Excel

Μερικές φορές χρειάζεται να αντιγράψετε κελιά που πληρούν συγκεκριμένα κριτήρια. Και εδώ θα παρουσιάσουμε 2 χρήσιμες μεθόδους για την αντιγραφή των κελιών-στόχων.

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

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

Έτσι, τώρα μπορείτε να χρησιμοποιήσετε τις παρακάτω δύο μεθόδους για να ολοκληρώσετε αυτήν την εργασία.

Μέθοδος 1: Αντιγράψτε το αποτέλεσμα φίλτρου

Εάν τα κελιά-στόχοι βρίσκονται σε ένα εύρος, μπορείτε να χρησιμοποιήσετε τη λειτουργία φιλτραρίσματος στο Excel. Μπορείτε να ορίσετε πολλά κριτήρια για τη στήλη και, στη συνέχεια, να αντιγράψετε το αποτέλεσμα του φίλτρου.

1. Τοποθετήστε τον κέρσορα σας εντός του εύρους στόχου.
2. Και μετά κάντε κλικ στο κουμπί "Ταξινόμηση και φίλτρο" στη γραμμή εργαλείων.
3. Στη συνέχεια, επιλέξτε την επιλογή "Φίλτρο" στην αναπτυσσόμενη λίστα.
4. Τώρα κάντε κλικ στο κουμπί στην κεφαλίδα της στήλης.
5. Στη συνέχεια, επιλέξτε την επιλογή "Φίλτρα αριθμού"
6. Στο υπομενού, ορίστε την επιλογή που χρειάζεστε. Εδώ θα επιλέξουμε το "Greater Than".
7. Στο παράθυρο "Custom AutoFilter", ορίστε τα κριτήρια που χρειάζεστε.
8. Και μετά κάντε κλικ στο κουμπί "ΟΚ".

Επομένως, μόνο τα κελιά που πληρούν το κριτήριο θα εμφανίζονται στο φύλλο εργασίας. Άλλα κελιά θα κρυφτούν.

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

1. Επιλέξτε το αποτέλεσμα στο φύλλο εργασίας.
2. Και, στη συνέχεια, πατήστε τα πλήκτρα συντόμευσης "Ctrl + C" στο πληκτρολόγιο για να αντιγράψετε το εύρος.
3. Τώρα κάντε κλικ σε ένα άλλο κελί στο φύλλο εργασίας.
4. Στη συνέχεια, πατήστε τα πλήκτρα συντόμευσης "Ctrl + V" για να επικολλήσετε αυτά τα κελιά.
5. Και μετά πατήστε το κουμπί "Esc" για έξοδο από τη λειτουργία αντιγραφής.

Μπορείτε να δείτε ότι μόνο τα κελιά που πληρούν τα κριτήρια θα επικολληθούν στη νέα περιοχή.

Ωστόσο, θα αντιμετωπίσετε προβλήματα εάν επικολλήσετε στο εύρος που μοιράζονται τις ίδιες σειρές με το αρχικό εύρος. Εδώ επικολλούνται μόνο δύο αριθμοί στη νέα περιοχή.

Ο λόγος είναι στην πραγματικότητα πολύ απλός. Στην αρχική περιοχή, τα κελιά που δεν πληρούν το κριτήριο κρύβονται. Και ολόκληρες οι σειρές που περιέχουν αυτά τα κελιά κρύβονται επίσης. Επομένως, στο νέο εύρος, μπορείτε να δείτε μόνο μέρος του αποτελέσματος. Άλλες τιμές βρίσκονται στις κρυφές σειρές. Για να δείξετε το αποτέλεσμα, μπορείτε να διαγράψετε τα κριτήρια στη λειτουργία φίλτρου. Και μετά μπορείτε να δείτε ολόκληρο το αποτέλεσμα στο φύλλο εργασίας.

Μέθοδος 2: Χρησιμοποιήστε τη μακροεντολή VBA

Όταν αυτά τα κελιά-στόχοι δεν βρίσκονται σε μια στήλη, δεν μπορείτε να χρησιμοποιήσετε τη λειτουργία φιλτραρίσματος. Και για να ολοκληρώσετε αυτήν την εργασία, τώρα μπορείτε να χρησιμοποιήσετε μακροεντολή VBA.

1. Πατήστε τα πλήκτρα συντόμευσης "Alt + F11" στο πληκτρολόγιο για να ανοίξετε το πρόγραμμα επεξεργασίας της Visual Basic.
2. Και μετά κάντε κλικ στην καρτέλα "Εισαγωγή" στη γραμμή εργαλείων.
3. Μετά από αυτό, ορίστε την επιλογή «Ενότητα» στο υπομενού. Επομένως, έχετε εισαγάγει μια νέα ενότητα σε αυτό το έργο.
4. Σε αυτό το βήμα, αντιγράψτε τους ακόλουθους κωδικούς VBA στη νέα λειτουργική μονάδα.

Sub Copy_Cells()
  Dim c As Range, i As Integer, j As Integer
  i = 0
  For Each c In Range("B2:B13")
    If c > 350 Then
      Cells(2 + i, 6) = Cells(c.Row, c.Column - 1)
      Cells(2 + i, 7) = c
    End If
    i = i + 1
  Next c
   For j = 13 To 2 Step -1
    If Cells(j, 6) = "" Then
      Range("F" & j, "G" & j).Delete Shift:=xlUp
    End If
  Next j
End Sub

Σε αυτήν τη μακροεντολή, θα βρούμε τα κελιά που πληρούν τα κριτήρια. Και στη συνέχεια οι τιμές θα αντιγραφούν σε ένα νέο εύρος. Όταν ολοκληρωθεί η διαδικασία αντιγραφής και επικόλλησης, αυτή η μακροεντολή θα διαγράψει τα κενά κελιά στο νέο εύρος. Στο πραγματικό φύλλο εργασίας σας, πρέπει να αλλάξετε τα κριτήρια και το εύρος των κωδικών ανάλογα με την πραγματική σας ανάγκη.

5. Εδώ κάντε κλικ στο κουμπί "Run Sub" στη γραμμή εργαλείων ή πατήστε το κουμπί "Enter" στο πληκτρολόγιο για να εκτελέσετε τη μακροεντολή.

Στη συνέχεια, επιστρέψτε στο φύλλο εργασίας, θα δείτε ότι το αποτέλεσμα βρίσκεται ήδη στο φύλλο εργασίας.

Μπορείτε επίσης να χρησιμοποιήσετε μακροεντολές VBA για να βρείτε κελιά που δεν βρίσκονται σε στήλη. Έτσι, όταν πρέπει να αντιγράψετε κελιά σε πολλές περιοχές, μπορείτε να τροποποιήσετε τη μακροεντολή και να τη χρησιμοποιήσετε.

Σύγκριση των δύο μεθόδων

Σε αυτόν τον πίνακα, θα σας δείξουμε τα πλεονεκτήματα και τα μειονεκτήματα των δύο μεθόδων.

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

Η ασφάλεια του Excel είναι αιτία ανησυχίας

Η ασφάλεια του Excel είναι πολύ σημαντική για εσάς και θα πρέπει να δώσετε μεγαλύτερη προσοχή στην ασφάλεια του Excel. Πολλοί χρήστες έχουν χάσει τα δεδομένα και τις πληροφορίες τους στο Excel για διάφορους λόγους. Εάν δεν μπορείτε να εγγυηθείτε την ασφάλεια των αρχείων σας, είναι σίγουρο ότι θα υποφέρετε πολύ. Το αποτέλεσμα της καταστροφής του Excel μπορεί να είναι καταστροφικό. Κάθε φορά που αντιμετωπίζετε σφάλματα στο Excel, μπορείτε... επιδιορθώστε την καταστροφή δεδομένων του Excel xls από ένα χρήσιμο εργαλείο τρίτων. με αυτό το εργαλείο στο χέρι, δεν θα χάσετε ποτέ τα δεδομένα και τις πληροφορίες σας.

Εισαγωγή συγγραφέα:

Η Άννα Μα είναι ειδική ανάκτησης δεδομένων στο DataNumen, Inc., η οποία είναι ο παγκόσμιος ηγέτης στις τεχνολογίες ανάκτησης δεδομένων, συμπεριλαμβανομένων επισκευή Word doc ζημιά και προϊόντα λογισμικού επισκευής προοπτικών. Για περισσότερες πληροφορίες επισκεφθείτε www.datanumen.com