Πίνακας περιεχομένων
Εάν το σύνολο δεδομένων σας περιέχει κενά διαστήματα που είναι περιττά, ίσως χρειαστεί να τα αφαιρέσετε. Σε αυτό το άρθρο, θα σας δείξω επτά αποτελεσματικούς τρόπους για την αφαίρεση κενών διαστημάτων στο Excel.
Ας πούμε ότι έχουμε ένα σύνολο δεδομένων όπου διάφορα κελιά έχουν πολλαπλά κενά διαστήματα. Τώρα θα αφαιρέσουμε αυτά τα κενά διαστήματα.
Κατεβάστε το βιβλίο ασκήσεων
Αφαίρεση κενών διαστημάτων στο Excel.xlsm7 τρόποι για να αφαιρέσετε κενά διαστήματα στο Excel
1. Λειτουργία TRIM για την αφαίρεση κενών διαστημάτων
Μπορείτε εύκολα να αφαιρέσετε τα κενά διαστήματα
χρησιμοποιώντας το η λειτουργία TRIM Πληκτρολογήστε τον ακόλουθο τύπο σε ένα κενό κελί ( A16 ),
=TRIM(A5)
Εδώ, η TRIM η συνάρτηση θα αφαιρέσει τα επιπλέον κενά διαστήματα από το επιλεγμένο κελί A5 .
Τύπος ENTER και θα βρείτε το κείμενο χωρίς κενά διαστήματα στο κελί A16 .
Κελί σύρσης A16 για να εφαρμόσετε τον ίδιο τύπο για όλα τα άλλα κελιά της στήλης A .
Διαβάστε περισσότερα: Πώς να αφαιρέσετε το κενό πριν από το κείμενο στο Excel
2. Εντολή εύρεσης και αντικατάστασης
Χρήση του Εύρεση και αντικατάσταση είναι ένας άλλος τρόπος για να αφαιρέσετε τα κενά διαστήματα. Αρχικά, επιλέξτε τα κελιά από τα οποία θέλετε να αφαιρέσετε τα κενά διαστήματα και μεταβείτε στην εντολή Αρχική σελίδα> Επεξεργασία> Εύρεση & επιλογή> Αντικατάσταση
Τώρα, ένα Εύρεση και αντικατάσταση Θα εμφανιστεί το παράθυρο. Βρείτε τι και κάντε κλικ στο Αντικαταστήστε όλα .
Τώρα θα εμφανιστεί ένα πλαίσιο επιβεβαίωσης που θα δείχνει τον αριθμό των αντικαταστάσεων. OK σε αυτό το πλαίσιο και κλείστε το Εύρεση και αντικατάσταση παράθυρο.
Τώρα μπορείτε να δείτε ότι όλα τα κενά διαστήματα έχουν αφαιρεθεί από τα επιλεγμένα κελιά σας.
Διαβάστε περισσότερα: Πώς να αφαιρέσετε κενά σε ένα κελί στο Excel
3. Λειτουργία SUBSTITUTE για την αφαίρεση κενών διαστημάτων
Μπορείτε επίσης να χρησιμοποιήσετε η συνάρτηση SUBSTITUTE για να αφαιρέσετε τα κενά διαστήματα. Πληκτρολογήστε τον ακόλουθο τύπο στο κελί B16 ,
=SUBSTITUTE(B5, " ", "")
Εδώ, η συνάρτηση αντικατάστασης θα αφαιρέσει τα κενά από το επιλεγμένο κελί B5 .
Τύπος ENTER και θα λάβετε το κείμενο χωρίς κενά διαστήματα στο κελί B16 .
Σύρετε το B16 κελί για να εφαρμοστεί ο τύπος σε όλα τα άλλα κελιά της στήλης B .
Παρόμοιες αναγνώσεις:
- Αφαίρεση όλων των κενών στο Excel (9 μέθοδοι)
- Πώς να αφαιρέσετε τα κενά στο τέλος του Excel (6 εύκολες μέθοδοι)
- Αφαίρεση του κορυφαίου διαστήματος στο Excel (5 χρήσιμοι τρόποι)
4. Αφαίρεση κενού χώρου με τη λειτουργία REPLACE
Χρήση του η λειτουργία REPLACE είναι ένας άλλος τρόπος για να αφαιρέσετε τα κενά διαστήματα. Πληκτρολογήστε τον ακόλουθο τύπο στο κελί B16 ,
=REPLACE(B5,1,LEN(B5)-LEN(TRIM(B5)),"")
Ορίστε, η συνάρτηση LEN δίνει το μήκος της συμβολοσειράς του κελιού B5 . LEN(B5)-LEN(TRIM(B5)
δίνει τον αριθμό των κενών χώρων. Τέλος, το τμήμα ΑΝΤΙΚΑΤΑΣΤΑΣΗ αντικαθιστά το αρχικό κείμενο με τη συμβολοσειρά χωρίς κενά διαστήματα.
Τύπος ENTER και θα λάβετε το κείμενο χωρίς κενά διαστήματα στο κελί B16 .
Κελί σύρσης B16 για να εφαρμόσετε τον τύπο για όλα τα άλλα κελιά της στήλης B .
5. Χαρακτηριστικά κειμένου σε στήλη για την αφαίρεση κενών διαστημάτων
Μπορείτε επίσης να χρησιμοποιήσετε Κείμενο σε στήλη για να αφαιρέσετε τα κενά διαστήματα από μια στήλη. Πρώτα, επιλέξτε τη στήλη και μεταβείτε στο Δεδομένα> Εργαλεία δεδομένων> Κείμενο σε στήλες
Μετά από αυτό, ένα παράθυρο με το όνομα Οδηγός μετατροπής κειμένου σε στήλες θα εμφανιστεί. Επιλέξτε Σταθερό πλάτος και κάντε κλικ στο Επόμενο .
Στο δεύτερο βήμα, μετακινήστε την κάθετη γραμμή στο τέλος του κειμένου σας και κάντε κλικ στο Επόμενο.
Στο τελευταίο βήμα, επιλέξτε Γενικά και κάντε κλικ στο Τελειώστε.
Τώρα μπορείτε να δείτε ότι τα κελιά των επιλεγμένων στηλών σας δεν έχουν κενά διαστήματα.
6. VBA για την αφαίρεση κενών διαστημάτων
Ένας άλλος τρόπος για την αφαίρεση κενών διαστημάτων είναι η δημιουργία μιας προσαρμοσμένης συνάρτησης χρησιμοποιώντας Εφαρμογές Microsoft Visual Basic (VBA) . Πρώτον, πατήστε ALT+F11 . Θα ανοίξει το VBA Τώρα στο παράθυρο VBA παράθυρο από το Έργο Κάντε δεξί κλικ στο όνομα του φύλλου. Θα εμφανιστεί ένα αναπτυσσόμενο μενού. Κάντε κλικ στο Εισαγωγή από το αναπτυσσόμενο μενού για να το επεκτείνετε και να επιλέξετε Ενότητα .
Τώρα, ένα Ενότητα (κωδικός) θα εμφανιστεί το παράθυρο.
Εισάγετε τον ακόλουθο κώδικα στο Ενότητα .
Sub Remove_Blanks() Dim x As Range For Each x In Selection.Cells x.Value = VBA.Trim(x.Value) Next x End Sub
Αφού εισαγάγετε τον κώδικα, κλείστε το παράθυρο VBA Τώρα, επιλέξτε το σύνολο δεδομένων σας και μεταβείτε στο Προβολή> Μακροεντολές .
A Μάκρο θα εμφανιστεί το παράθυρο. Πατήστε στο Τρέξτε.
Θα αφαιρέσει όλα τα περιττά κενά διαστήματα από το σύνολο δεδομένων σας.
7. Power Query για την αφαίρεση κενών διαστημάτων
Χρήση του Ερώτηση ισχύος είναι μια άλλη μέθοδος για την αφαίρεση κενών διαστημάτων. Επιλέξτε το σύνολο δεδομένων σας και μεταβείτε στο Δεδομένα> Λήψη δεδομένων> Από άλλες πηγές> Από πίνακα/περιοχή
A Δημιουργία πίνακα θα εμφανιστεί το πλαίσιο. Πατήστε στο OK .
Τώρα, ένα Power Query Editor θα ανοίξει το παράθυρο.
Μπορείτε να δείτε ότι όλα τα δεδομένα σας έχουν εισαχθεί στο παράθυρο.
Τώρα κάντε δεξί κλικ σε οποιαδήποτε από τις επικεφαλίδες και επιλέξτε Μετασχηματισμός> Trim .
Επαναλάβετε την ίδια διαδικασία για όλες τις στήλες. Θα αφαιρέσει τα κενά διαστήματα.
Τώρα, από την αρχική καρτέλα, επιλέξτε Κλείσιμο & Φόρτωση .
Τώρα μπορείτε να δείτε ότι τα δεδομένα εισάγονται στο αρχείο Excel σε ένα νέο φύλλο με όνομα Πίνακας.
Συμπέρασμα
Η χειροκίνητη αφαίρεση κενών διαστημάτων μπορεί να είναι πολύ κουραστική. Οποιαδήποτε από τις παραπάνω μεθόδους που περιγράφονται θα σας επιτρέψει να αφαιρέσετε τα κενά διαστήματα από το σύνολο δεδομένων σας με μερικά κλικ. Ελπίζω να βρήκατε αυτό το άρθρο χρήσιμο. Αν έχετε οποιαδήποτε σύγχυση, αφήστε ένα σχόλιο.