Πώς να αντιγράψετε και να επικολλήσετε μόνο μη κενά κελιά στο Excel;
Οι περισσότεροι από εμάς ενδέχεται να υποφέρουν με αυτό το πρόβλημα, όταν αντιγράφουμε μια λίστα δεδομένων που περιέχουν ορισμένα κενά κελιά και στη συνέχεια επικολλά τα σε μια άλλη στήλη, τα κενά κελιά θα επικολληθούν επίσης. Αυτό είναι πολύ ενοχλητικό όταν δεν χρειαζόμαστε τα κενά και θέλουμε να επικολλήσουμε μόνο μη κενά κελιά. Σε αυτήν την περίπτωση, πώς θα μπορούσαμε να αντιγράψουμε και να επικολλήσουμε μόνο κενά κελιά στο Excel γρήγορα και εύκολα; Εδώ είναι μερικά γρήγορα κόλπα για να το λύσετε:
Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά με την εντολή Go To Special
Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά με δυνατότητα φίλτρου
Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά με τον τύπο Array
Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά με κώδικα VBA
Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά με το Kutools για Excel
Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά με την εντολή Go To Special
Με την Πηγαίνετε στο ειδικό εντολή, μπορείτε να επιλέξετε πρώτα όλα τα δεδομένα και, στη συνέχεια, να τα αντιγράψετε και να τα επικολλήσετε σε άλλη τοποθεσία.
1. Επιλέξτε τη λίστα δεδομένων που θέλετε να χρησιμοποιήσετε.
2. Στη συνέχεια κάντε κλικ στο κουμπί Αρχική > Εύρεση & Επιλογή > Πηγαίνετε στο ειδικό, δείτε το στιγμιότυπο οθόνης:
3. Στην Πηγαίνετε στο ειδικό πλαίσιο διαλόγου, επιλέξτε Σταθερά επιλογή, δείτε το στιγμιότυπο οθόνης:
4. Στη συνέχεια κάντε κλικ στο κουμπί OK, και μόνο τα κελιά τιμών έχουν επιλεγεί στη λίστα.
5. Και, στη συνέχεια, αντιγράψτε και επικολλήστε τα δεδομένα σε μια τοποθεσία που θέλετε. Και έχουν επικολληθεί μόνο οι μη κενές τιμές κελιών. Δείτε το στιγμιότυπο οθόνης:
Note: Αυτή η μέθοδος είναι διαθέσιμη μόνο για τις σταθερές, δεν εφαρμόζεται στα κελιά τύπου.
Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά με δυνατότητα φίλτρου
Η καλύτερη Φίλτρο Η δυνατότητα μπορεί να σας βοηθήσει να φιλτράρετε πρώτα τα μη κενά κελιά και, στη συνέχεια, μπορείτε να τα αντιγράψετε και να τα επικολλήσετε σε άλλα κελιά όπως χρειάζεστε.
2. Κλίκ ημερομηνία > Φίλτρο, δείτε το στιγμιότυπο οθόνης:
3. Στη συνέχεια, κάντε κλικ στο αναπτυσσόμενο κουμπί στη δεξιά γωνία του κελιού στην επιλεγμένη λίστα και καταργήστε την επιλογή του Κενά επιλογή στο αναπτυσσόμενο μενού. Δείτε το στιγμιότυπο οθόνης:
4. Και στη συνέχεια κάντε κλικ στο κουμπί OK, όλα τα μη κενά κελιά έχουν φιλτραριστεί όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης:
5. Επιτέλους, μπορείτε να αντιγράψετε τα φιλτραρισμένα δεδομένα και να τα επικολλήσετε σε οποιαδήποτε τοποθεσία χρειάζεστε.
Note: Και οι δύο τιμές και οι τύποι εφαρμόζονται χρησιμοποιώντας αυτόν τον τρόπο.
Επιλέξτε μη κενά κελιά ταυτόχρονα |
Κάντε κλικ για δωρεάν πλήρη δοκιμαστική δοκιμή στο 30 ημέρες! |
![]() |
Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά με τον τύπο Array
Για να αντιγράψετε και να επικολλήσετε μόνο τα κενά κελιά, μπορείτε επίσης να εφαρμόσετε τον ακόλουθο τύπο πίνακα.
1. Εκτός από τα δεδομένα σας, εισαγάγετε τον ακόλουθο τύπο σε ένα κενό κελί:
=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))
Note: Στον παραπάνω τύπο, A1: A15 είναι η λίστα δεδομένων που θέλετε να χρησιμοποιήσετε. Μπορείτε να την αλλάξετε ανάλογα με τις ανάγκες σας.
2. Στη συνέχεια πατήστε Shift + Ctrl + Enter μαζί τα πλήκτρα και, στη συνέχεια, επιλέξτε το κελί B1 και σύρετε τη λαβή πλήρωσης στο εύρος που θέλετε να περιέχει αυτόν τον τύπο και έχουν εξαχθεί όλες οι μη κενές τιμές κελιών. Δείτε το στιγμιότυπο οθόνης:
3. Δεδομένου ότι είναι τύποι, όταν τα αντιγράφετε σε άλλο μέρος, θα πρέπει να τα αντιγράψετε και να τα επικολλήσετε ως τιμές.
Note: Αυτός ο τύπος είναι διαθέσιμος μόνο για τις σταθερές και δεν εφαρμόζεται στα κελιά τύπου.
Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά με κώδικα VBA
Εάν σας ενδιαφέρει ο κώδικας VBA, μπορείτε να εκτελέσετε τον ακόλουθο κώδικα για να ολοκληρώσετε αυτήν την εργασία.
1. Κρατήστε πατημένο το ALT + F11 και ανοίγει το Παράθυρο Microsoft Visual Basic for Applications.
2. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Παράθυρο ενότητας.
Κωδικός VBA: Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά στο Excel
Sub PasteNotBlanks()
'Update 20140325
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
If InputRng.Columns.Count > 1 Then
MsgBox "Please select one column."
Exit Sub
End If
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
InputRng.SpecialCells(xlCellTypeConstants).Copy Destination:=OutRng.Range("A1")
End Sub
3. Στη συνέχεια πατήστε F5 για να εκτελέσετε αυτόν τον κωδικό, θα εμφανιστεί ένα πλαίσιο προτροπής που θα σας υπενθυμίζει ότι επιλέγετε το εύρος δεδομένων που θέλετε να χρησιμοποιήσετε. Δείτε το στιγμιότυπο οθόνης:
4. Και στη συνέχεια κάντε κλικ στο κουμπί OK, θα εμφανιστεί ένα άλλο πλαίσιο προτροπής για να σας επιτρέψει να επιλέξετε ένα κελί για να βάλετε τα δεδομένα.
5. Πατήστε OK για να ολοκληρώσετε αυτόν τον κώδικα και μόνο οι μη κενές τιμές κελιών έχουν επικολληθεί στην καθορισμένη θέση σας.
Note: Αυτός ο κωδικός είναι διαθέσιμος μόνο στις σταθερές.
Αντιγράψτε και επικολλήστε μόνο μη κενά κελιά με το Kutools για Excel
Υπάρχει πολύ πιο εύκολος τρόπος από πάνω; Φυσικά, Kutools για Excel's Επιλέξτε μη κενό κελίΤο βοηθητικό πρόγραμμα μπορεί να σας βοηθήσει να επιλέξετε πρώτα τα μη κενά κελιά και, στη συνέχεια, να τα αντιγράψετε και να τα επικολλήσετε.
Kutools για Excel, με περισσότερα από 300 εύχρηστες λειτουργίες, διευκολύνει τις εργασίες σας. | ||
Μετά το δωρεάν εγκατάσταση Kutools για Excel, κάντε τα παρακάτω:
1. Επιλέξτε το εύρος κελιών και κάντε κλικ Kutools > Αγορά > Επιλέξτε μη κενά κελιά. Δείτε το στιγμιότυπο οθόνης:
2. Στη συνέχεια, επιλέγονται τα μη κενά κελιά, πατήστε Ctrl + C για να τα αντιγράψετε και, στη συνέχεια, μεταβείτε για να επιλέξετε ένα κελί στο οποίο θέλετε να εξάγετε το αποτέλεσμα που έχει περάσει, πατήστε Ctrl + V για να επικολλήσετε επιλεγμένα μη κενά κελιά. Δείτε το στιγμιότυπο οθόνης:
Αντιγράψτε και επικολλήστε μόνο μη κενό κελί
Kutools για Excel: 300+ λειτουργίες που πρέπει να έχετε στο Excel, 30- δωρεάν δοκιμαστική περίοδο από εδώ |
Τα καλύτερα εργαλεία παραγωγικότητας του Office
Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%
- Επαναχρησιμοποίηση: Εισαγάγετε γρήγορα σύνθετοι τύποι, γραφήματα και οτιδήποτε έχετε χρησιμοποιήσει στο παρελθόν. Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
- Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
- Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές / στήλες... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
- Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
- Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
- Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
- Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
- Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
- Περισσότερα από 300 ισχυρά χαρακτηριστικά. Υποστηρίζει Office / Excel 2007-2021 και 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας. Πλήρεις δυνατότητες δωρεάν δοκιμής 30 ημερών. Εγγύηση επιστροφής χρημάτων 60 ημερών.

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











