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

4 εύκολοι τρόποι για γρήγορη αφαίρεση πολλαπλών κενών ή κενών σειρών στο Excel

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


Μέθοδος Α: Κατάργηση κενών γραμμών με την εντολή Μετάβαση σε ειδικό

Τώρα κάντε τα παρακάτω βήματα για να αφαιρέσετε κενές γραμμές με τις γραμμές Go To Special:

1. Επιλέξτε το εύρος που θέλετε να καταργήσετε κενές γραμμές, κάντε κλικ στο Αρχική καρτέλα και μετά Επεξεργασία ομάδα, πατήστε Εύρεση & Επιλογή > Πηγαίνετε στο ειδικό.
doc διαγράψτε την κενή σειρά 2

2. Στο Πηγαίνετε στο ειδικό διάλογος, ελέγξτε Κενά επιλογή.
doc διαγράψτε την κενή σειρά 3

3. κλικ OK, τώρα έχουν επιλεγεί όλα τα κενά κελιά στην επιλογή.
doc διαγράψτε την κενή σειρά 4

4. κλικ Αρχική στην καρτέλα Κύτταρα ομάδα, πατήστε Διαγραφή > Διαγραφή σειρών φύλλων.
doc διαγράψτε την κενή σειρά 5

Τώρα οι γραμμές με κενά κελιά έχουν αφαιρεθεί.
doc διαγράψτε την κενή σειρά 6

Σημείωση:

Υπάρχει ανεπανόρθωτη ροή ενώ χρησιμοποιείτε την εντολή Μετάβαση σε ειδικό για να διαγράψετε κενές γραμμές:
Όλες οι σειρές περιέχουν κενά κελιά (ακόμα και αν η σειρά περιέχει ένα κενό κελί και άλλες στήλες περιέχουν δεδομένα) θα αφαιρεθούν όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης.

doc διαγράψτε την κενή σειρά 1


Θέλετε να αυξήσετε τις πληρωμές και πολύ χρόνο για να συνοδεύσετε την οικογένεια;

Η καρτέλα του Office βελτιώνει την αποτελεσματικότητά σας κατά 50% στο Microsoft Office που λειτουργεί τώρα

Απίστευτο, η εργασία σε δύο ή περισσότερα έγγραφα είναι ευκολότερη και ταχύτερη από την εργασία σε ένα.

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

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

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

Δωρεάν δοκιμή 30 ημερών, δεν απαιτείται πιστωτική κάρτα.

Δείτε ΠερισσότεραΚατεβάστε τώρα


Μέθοδος Β: Κατάργηση κενών γραμμών στο εύρος / φύλλο / βιβλίο εργασίας με το Kutools

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

Ωστόσο, πριν χρησιμοποιήσετε αυτό το εργαλείο, πρέπει να το κάνετε δωρεάν εγκατάσταση του Kutools για Excel Πρώτα.

Πατήστε Kutools > Διαγραφή > Διαγραφή κενών γραμμώνκαι, στη συνέχεια, στην αναπτυσσόμενη λίστα sub, επιλέξτε μία λειτουργία όπως χρειάζεστε.
doc διαγράψτε την κενή σειρά 17

Επίδειξη: Καταργήστε όλες τις κενές σειρές με ένα μόνο κλικ


Μέθοδος Γ: Κατάργηση κενών γραμμών με τον κωδικό VBA

1. Τύπος Alt + F11 κλειδί για ενεργοποίηση Microsoft Visual Basic για εφαρμογές παράθυρο.

2. κλικ Κύριο θέμα > Μονάδα μέτρησης για να δημιουργήσετε ένα νέο Μονάδα μέτρησης script, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο script.

VBA: Κατάργηση κενών σειρών

Sub DeleteBlankRows()
'Update 20190107
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xRows = WorkRng.Rows.Count
Application.ScreenUpdating = False
For I = xRows To 1 Step -1
    If Application.WorksheetFunction.CountA(WorkRng.Rows(I)) = 0 Then
        WorkRng.Rows(I).EntireRow.Delete XlDeleteShiftDirection.xlShiftUp
    End If
Next
Application.ScreenUpdating = True
End Sub

doc διαγράψτε την κενή σειρά 7

3. Τύπος F5 για να εκτελέσετε τον κώδικα και, στη συνέχεια, επιλέξτε ένα εύρος που χρησιμοποιείτε για να αφαιρέσετε κενές γραμμές στο αναδυόμενο παράθυρο KutoolsforExcel διαλόγου.
doc διαγράψτε την κενή σειρά 8

4. κλικ OK. Τώρα οι κενές σειρές στην επιλογή έχουν αφαιρεθεί.
doc διαγράψτε την κενή σειρά 9

Σημείωση:

Με αυτόν τον κώδικα VBA, καλύτερα να αφαιρέσετε κενές σειρές σε ένα εύρος αλλά όχι σε ολόκληρο το φύλλο εργασίας, διαφορετικά το Microsoft Excel μπορεί να κολλήσει.


Μέθοδος Δ: Αφαιρέστε τις κενές σειρές με τη βοηθητική στήλη και τη λειτουργία φίλτρου

1. Εισαγάγετε μια στήλη πριν από το εύρος δεδομένων σας, πάρτε την εισαγωγή της στήλης Α ως παράδειγμα και, στη συνέχεια, πληκτρολογήστε αυτόν τον τύπο = B3 & C3 & D3 στο A3 για να συνδυάσετε δεδομένα στη σειρά3, δείτε το στιγμιότυπο οθόνης:

Άκρο: Εάν τα δεδομένα σας σε όλη τη στήλη B3 στη στήλη N, προσαρμόστε τον τύπο σε = B3 & C3 & D3 & E3 &… & N3.
doc διαγράψτε την κενή σειρά 10

2. Στη συνέχεια, συμπληρώστε τον τύπο στα κελιά σύροντας τη λαβή αυτόματης πλήρωσης προς τα κάτω.
doc διαγράψτε την κενή σειρά 11

3. Στη συνέχεια κάντε κλικ στο κουμπί ημερομηνία > Φίλτρα.
doc διαγράψτε την κενή σειρά 12

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

5. κλικ OK, όλες οι κενές σειρές έχουν φιλτραριστεί.
doc διαγράψτε την κενή σειρά 14

6. Επιλέξτε τις φιλτραρισμένες σειρές, κάντε κλικ στο Αρχική > Διαγραφή > Διαγραφή σειρών φύλλων για να αφαιρέσετε τις κενές σειρές.
doc διαγράψτε την κενή σειρά 15

7. Στη συνέχεια κάντε κλικ στο κουμπί ημερομηνία > Φίλτρα και πάλι για απενεργοποίηση Φίλτρα λειτουργία.
doc διαγράψτε την κενή σειρά 16

Σημείωση:

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


Σχετική λειτουργία: Εισαγάγετε κενές γραμμές σε κάθε άλλη σειρά

Ίσως σε μερικές φορές, θέλετε να εισαγάγετε κενές σειρές σε κάθε άλλη σειρά ενός εύρους, όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης:
doc διαγράψτε την κενή σειρά 18

Σε αυτήν την περίπτωση, μπορείτε να εφαρμόσετε το Εισαγωγή κενών γραμμών & στηλών χρησιμότητα του Kutools για Excel για γρήγορη διαχείριση αυτής της εργασίας.

1. Επιλέξτε το εύρος που θέλετε να εισαγάγετε κενές γραμμές ή στήλες σε κάθε άλλη σειρά και, στη συνέχεια, κάντε κλικ στο Kutools > Κύριο θέμα > Εισαγωγή κενών γραμμών & στηλών.
doc διαγράψτε την κενή σειρά 19

2. Στο Εισαγωγή κενών γραμμών & στηλών διάλογος, ελέγξτε Κενές σειρές or Κενές στήλες επιλογή όπως χρειάζεστε Εισαγωγή τύπου ενότητα, τότε, σε Επιλογές ενότητα, καθορίστε το Διάστημα και Γραμμές/Στήλες.
doc διαγράψτε την κενή σειρά 20

3. κλικ Ok, έχουν εισαχθεί κενές σειρές σε κάθε άλλη σειρά της επιλογής.

Επίδειξη: Εισαγωγή κενών γραμμών & στηλών


Λήψη δείγματος αρχείου

δείγμαΚάντε κλικ για λήψη του δείγματος αρχείου

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

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

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

Περιγραφή


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

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
Comments (54)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
excelente me sirvio el punto uno para 40000 registros en 1 seg
This comment was minimized by the moderator on the site
Great!!! This helps a lot.
This comment was minimized by the moderator on the site
VERY NICE, THANKS
This comment was minimized by the moderator on the site
:lol: Good to share! Thank you!
This comment was minimized by the moderator on the site
Very Helpful :-) it helped me to reconcile big report.
This comment was minimized by the moderator on the site
Guys I recently had this issue. I realised that the F5 special blanks wouldn't work because some of my columns had merged data sharing some rows... I just selected the columns needed and make sure the merge button was unselected. From there, the F5 special blanks select worked! Hope it helps someone.
This comment was minimized by the moderator on the site
This is simple VBA code to delete the entire rows based on particular column:- Sub DeleletBlankrows() Range("A1:A10000").SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub
This comment was minimized by the moderator on the site
only usefull if you want to delete ANY row with ONE blank cell, not delete rows with ALL cells being blank. Isn't this titled "How to remove blank or empty rows in Excel?" not "How to remove rows with blank cells?"
This comment was minimized by the moderator on the site
Ah, no, actually. The whole purpose of the sort & filter routine I demonstrated is to take out ONLY rows that are entirely blank across. The inquirer did not want any row removed that had some data in it... only rows that were completely blank. And the problem with the BLANK command was that it took out ANY rows entirely that had even one blank cell, erasing the rest of the data on the same row. Try it. It does the opposite of what you stated in your first sentence.... it takes out only entire blank rows, and leaves ALL the remaining data intact.
This comment was minimized by the moderator on the site
When you select multiple columns, then go to Find & Select -> Go To Special and choose blanks, it will highlight every blank cell within that range. If you then proceed to Delete -> Delete Sheet Rows, it will delete all rows that had a blank cell selected. Go try it.
This comment was minimized by the moderator on the site
oh bro thankyou very very much .....
This comment was minimized by the moderator on the site
thanks a lot, it saved lot of time
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