Πώς να διαγράψετε όλες τις κενές στήλες στο Microsoft Excel

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

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

Χρήση μακροεντολής VBA

Η πρώτη μέθοδος περιλαμβάνει τη χρήση μιας μακροεντολής VBA.

1. Μεταβείτε στο αρχείο σας Excel.
   
2. Κρατήστε το Alt + F11 μαζί.
   
3. Περιμένετε να εμφανιστεί το παράθυρο της Microsoft Visual Basic για εφαρμογές.
   
4. Στη συνέχεια, κάντε κλικ στην Εισαγωγή.
   
5. Επιλέξτε Μονάδα.
   
6. Επικολλήστε τις ακόλουθες γραμμές κώδικα στο παράθυρο.
   Sub DeleteEmptyColumns()
'Updateby20140317
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address,Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Columns.Count To 1 Step -1
Set rng = InputRng.Cells(1, i).EntireColumn
If Application.WorksheetFunction.CountA(rng) = 0 Then
rng.Delete
End If
Next
Application.ScreenUpdating = True
End Sub
   
7. Πατήστε F5 για να μεταγλωττίσετε και να εκτελέσετε τη μακροεντολή.
   
8. Εισαγάγετε την κατάλληλη περιοχή εργασίας στο παράθυρο διαλόγου.
   
   Το εύρος είναι το συγκεκριμένο διάστημα μεταξύ των στηλών που θέλετε να στοχεύσετε. Η μορφή είναι $A$1:$J$12. Τα γράμματα αντιστοιχούν στη στήλη και οι αριθμοί αντιστοιχούν στις σειρές.
9. Πατήστε OK.
   

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

Χρήση των εργαλείων του Excel για τη διαγραφή κενών στηλών

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

1. Πρώτα, επιλέξτε το εύρος δεδομένων και πατήστε F5.
2. Στη συνέχεια, κάντε κλικ στο Ειδικό.
   
3. Τώρα, επιλέξτε την επιλογή Blanks.
   
4. Κάντε κλικ στο OK (Αυτή η επιλογή θα διασφαλίσει ότι όλα τα κενά κελιά έχουν επιλεγεί στη στοχευμένη περιοχή).
5. Μεταβείτε στην καρτέλα Αρχική σελίδα.
6. Επιλέξτε το αναπτυσσόμενο μενού Διαγραφή στην ομάδα Εργαλεία κελιών.
7. Επιλέξτε Διαγραφή κελιών.
8. Επιλέξτε Shift κελιά αριστερά για αφαίρεση και αναδιάταξη στηλών.
9. Κάντε κλικ στο OK.
   

Τώρα τα άδεια κελιά από τις κενές στήλες θα έπρεπε να έχουν εξαφανιστεί και όλες οι άλλες σειρές είναι πιο κοντά μεταξύ τους.

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

Επιλέξτε Shift cell up για αφαίρεση και αναδιάταξη σειρών.

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

Αυτή η μέθοδος δεν καταργεί πλέον όλα τα κενά κελιά της επιλογής. Πριν από το Excel 2013, αυτό θα καταργούσε ακούσια ακόμη και κενές σειρές, οι οποίες γενικά θα παρέσυραν την ταξινόμηση.

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

Διαγραφή κενών στηλών στο Android

Παρόλο που η διαδικασία είναι παρόμοια για τη διαγραφή κενών στηλών στο Excel σε Windows, Mac και Android, ακολουθεί μια γρήγορη επισκόπηση για το πώς να το κάνετε στο Android.

1. Ανοίξτε το υπολογιστικό φύλλο Excel που θέλετε να επεξεργαστείτε και πατήστε στην επικεφαλίδα της στήλης που θέλετε να επεξεργαστείτε.
2. Τώρα, επιλέξτε Διαγραφή από το μενού που εμφανίζεται.

Άλλες εύκολες στην εκτέλεση εργασίες ταξινόμησης

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

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

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

Μια τελική σκέψη

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

Εξάλλου, αν ήταν τόσο δύσκολο, η Microsoft θα είχε απλοποιήσει ακόμη περισσότερο τη διαδικασία ή θα είχε δημιουργήσει ακόμη πιο εκτενείς οδηγούς για την ταξινόμηση του Excel.