3 τρόποι για την αφαίρεση των επιστροφών μεταφοράς στο Excel: τύποι, μακροεντολή VBA, διάλογος εύρεσης και αντικατάστασης

  • Μοιραστείτε Αυτό
Michael Brown

Σε αυτή τη συμβουλή θα βρείτε 3 τρόπους για να αφαιρέσετε τις επιστροφές μεταφοράς από τα κελιά του Excel. Θα μάθετε επίσης πώς να αντικαταστήσετε τα διαλείμματα γραμμής με άλλα σύμβολα. Όλες οι λύσεις λειτουργούν για τις εκδόσεις Excel 365, 2021, 2019 και χαμηλότερες εκδόσεις.

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

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

Σημειώστε ότι αρχικά οι όροι "Carriage return" και "Line feed" χρησιμοποιούνταν σε μια γραφομηχανή και σήμαιναν 2 διαφορετικές ενέργειες, μπορείτε να βρείτε περισσότερα στο Wiki.

Οι ηλεκτρονικοί υπολογιστές και τα λογισμικά επεξεργασίας κειμένου δημιουργήθηκαν λαμβάνοντας υπόψη τις ιδιαιτερότητες της γραφομηχανής. Γι' αυτό και σήμερα χρησιμοποιούνται δύο διαφορετικά μη εκτυπώσιμα σύμβολα για να δηλώσουν τη διακοπή γραμμής: " Επιστροφή μεταφοράς " (CR, κωδικός ASCII 13) και " Τροφοδοσία γραμμής " (LF, κωδικός ASCII 10). Τα Windows χρησιμοποιούν 2 σύμβολα ένα προς ένα: CR+LF, και LF για τα συστήματα *NIX. Προσοχή: στο Excel μπορείτε να βρείτε και τις δύο παραλλαγές . Εάν εισάγετε δεδομένα από ένα αρχείο .txt ή .csv, είναι πιο πιθανό να βρείτε Επιστροφή μεταφοράς + Τροφοδοσία γραμμής Όταν διακόπτετε μια γραμμή χρησιμοποιώντας Alt+Enter , το Excel εισάγει Τροφοδοσία γραμμής μόνο.

Σε περίπτωση που λάβετε αρχεία .csv από κάποιον που χρησιμοποιεί Linux, Unix κ.λπ., θα βρείτε μόνο Τροφοδοτήσεις γραμμής ξανά.

Και οι 3 αυτοί τρόποι είναι πολύ γρήγοροι. Μπορείτε να επιλέξετε αυτόν που σας ταιριάζει καλύτερα:

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

    Αφαίρεση των Carriage Returns χειροκίνητα

    Πλεονεκτήματα: ο γρηγορότερος τρόπος.

    Μειονεκτήματα: καμία πρόσθετη λειτουργία :(.

    Παρακαλούμε βρείτε τα βήματα για την εξάλειψη των διαχωρισμών γραμμής χρησιμοποιώντας την Εύρεση και αντικατάσταση:

    1. Επιλέξτε όλα τα κελιά στα οποία θέλετε να αφαιρέσετε ή να αντικαταστήσετε τις επιστροφές χαρακτήρων.
    2. Πατήστε Ctrl+H για να ανοίξετε το Πλαίσιο διαλόγου Εύρεση & Αντικατάσταση .
    3. Στο Βρείτε τι πληκτρολογήστε Ctrl+J . Θα φαίνεται άδειο, αλλά θα δείτε μια μικρή τελεία.
    4. Στο Αντικαταστήστε με πληκτρολογήστε οποιαδήποτε τιμή για την αντικατάσταση των επιστροφών. Συνήθως, πρόκειται για διάστημα για να αποφύγετε την τυχαία ένωση 2 λέξεων. Αν το μόνο που χρειάζεστε είναι η διαγραφή των διαχωρισμών γραμμής, αφήστε το πεδίο "Replace With" κενό.
    5. Πατήστε το Αντικαταστήστε όλα και απολαύστε το αποτέλεσμα!

    Διαγραφή διαχωρισμών γραμμής με χρήση τύπων του Excel

    Πλεονεκτήματα: μπορείτε να χρησιμοποιήσετε μια αλυσίδα τύπων / ένθετους τύπους για σύνθετη επεξεργασία κειμένου κελιών. Για παράδειγμα, είναι δυνατή η αφαίρεση των επιστροφών μεταφοράς και στη συνέχεια η εξάλειψη των περιττών κενών στην αρχή και στο τέλος και εκείνων μεταξύ των λέξεων.

    Ή μπορεί να χρειαστεί να διαγράψετε τα carriage returns για να χρησιμοποιήσετε το κείμενό σας ως όρισμα μιας άλλης συνάρτησης χωρίς να αλλάξετε τα αρχικά κελιά. Για παράδειγμα, αν θέλετε να μπορείτε να χρησιμοποιήσετε το αποτέλεσμα ως όρισμα της συνάρτησης =lookup ().

    Μειονεκτήματα: θα πρέπει να δημιουργήσετε μια βοηθητική στήλη και να ακολουθήσετε πολλά επιπλέον βήματα.

    1. Προσθέστε τη βοηθητική στήλη στο τέλος των δεδομένων σας. Μπορείτε να την ονομάσετε "1 γραμμή".
    2. Στο πρώτο κελί της βοηθητικής στήλης ( C2 ), πληκτρολογήστε τον τύπο για την αφαίρεση/αντικατάσταση των διαχωρισμών γραμμής. Εδώ μπορείτε να δείτε διάφορους χρήσιμους τύπους για διαφορετικές περιπτώσεις:
      • Χειρίζεται συνδυασμούς επιστροφής μεταφορικών μέσων και τροφοδοσίας γραμμής τόσο στα Windows όσο και στο UNIX.

        =SUBSTITUTE(SUBSTITUTE(B2,CHAR(13),""),CHAR(10),"")

      • Ο επόμενος τύπος θα σας βοηθήσει να αντικαταστήσετε τη διακοπή γραμμής με οποιοδήποτε άλλο σύμβολο (κόμμα + κενό). Σε αυτή την περίπτωση οι γραμμές δεν θα ενώνονται και δεν θα εμφανίζονται επιπλέον κενά.

        =TRIM(SUBSTITUTE(SUBSTITUTE(B2,CHAR(13),""),CHAR(10),", ")

      • Αν θέλετε να αφαιρέσετε όλους τους μη εκτυπώσιμους χαρακτήρες από το κείμενο, συμπεριλαμβανομένων των διαχωρισμών γραμμής:

        =CLEAN(B2)

    3. Αντιγράψτε τον τύπο στα άλλα κελιά της στήλης.
    4. Προαιρετικά , μπορείτε να αντικαταστήσετε την αρχική στήλη με εκείνη στην οποία αφαιρέθηκαν τα διαλείμματα γραμμής:
      • Επιλογή όλων των κελιών στη στήλη C και πατήστε Ctrl + C για να αντιγράψετε τα δεδομένα στο πρόχειρο.
      • Τώρα επιλέξτε το κελί B2 και πατήστε τη συντόμευση Shift + F10. Στη συνέχεια, απλά πατήστε V .
      • Αφαιρέστε τη βοηθητική στήλη.

    Μακροεντολή VBA για να απαλλαγείτε από τα διαλείμματα γραμμής

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

    Μειονεκτήματα: θα πρέπει να έχετε τις βασικές γνώσεις της VBA.

    Η μακροεντολή VBA από το παρακάτω παράδειγμα διαγράφει τις επιστροφές μεταφοράς από όλα τα κελιά του τρέχοντος φύλλου εργασίας (ενεργό φύλλο εργασίας).

    Sub RemoveCarriageReturns() Dim MyRange As Range Application.ScreenUpdating = False Application.Calculation = xlCalculationManual For Each MyRange In ActiveSheet.UsedRange If 0 <InStr(MyRange, Chr(10)) Then MyRange = Replace(MyRange, Chr(10), "" ) End If Next Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub

    Εάν δεν γνωρίζετε καλά το VBA, ανατρέξτε στην ενότητα Πώς να εισαγάγετε και να εκτελέσετε κώδικα VBA στο Excel.

    Αφαίρεση επιστροφών μεταφοράς με το Text Toolkit

    Αν είστε τυχερός χρήστης της εργαλειοθήκης κειμένου ή της Ultimate Suite for Excel, τότε δεν χρειάζεται να σπαταλήσετε χρόνο για τους παραπάνω χειρισμούς. Το μόνο που χρειάζεται είναι αυτά τα 3 γρήγορα βήματα:

    1. Επιλέξτε ένα ή περισσότερα κελιά στα οποία θέλετε να διαγράψετε τα διαλείμματα γραμμής.
    2. Στην κορδέλα του Excel, μεταβείτε στην επιλογή Δεδομένα Ablebits tab>, Κείμενο και κάντε κλικ στο κουμπί Μετάτρεψε κουμπί.
    3. Στο Μετατροπή κειμένου παράθυρο, επιλέξτε το Μετατρέψτε το διάλειμμα γραμμής σε το κουμπί επιλογής, πληκτρολογήστε τον χαρακτήρα "αντικατάστασης" στο πλαίσιο και κάντε κλικ στο κουμπί Μετάτρεψε .

    Στο παράδειγμά μας, αντικαθιστούμε κάθε διάλειμμα γραμμής με ένα κενό, οπότε τοποθετείτε τον κέρσορα του ποντικιού στο πλαίσιο και πατάτε το πλήκτρο Enter:

    Ως αποτέλεσμα, θα έχετε έναν καλά οργανωμένο πίνακα με διευθύνσεις μιας γραμμής:

    Αν είστε περίεργοι να δοκιμάσετε αυτό και άλλα 60 εργαλεία εξοικονόμησης χρόνου για το Excel, μπορείτε να κατεβάσετε μια δοκιμαστική έκδοση της Ultimate Suite. Θα εκπλαγείτε όταν ανακαλύψετε λύσεις με λίγα κλικ για τις πιο δύσκολες και κουραστικές εργασίες στο Excel!

    Βίντεο: Πώς να αφαιρέσετε τα διαλείμματα γραμμής στο Excel

    Ο Michael Brown είναι ένας αφοσιωμένος λάτρης της τεχνολογίας με πάθος για την απλοποίηση πολύπλοκων διαδικασιών χρησιμοποιώντας εργαλεία λογισμικού. Με περισσότερο από μια δεκαετία εμπειρίας στον κλάδο της τεχνολογίας, έχει βελτιώσει τις δεξιότητές του στο Microsoft Excel και το Outlook, καθώς και στα Φύλλα Google και στα Έγγραφα. Το blog του Michael είναι αφιερωμένο στο να μοιράζεται τη γνώση και την τεχνογνωσία του με άλλους, παρέχοντας εύκολες συμβουλές και σεμινάρια για τη βελτίωση της παραγωγικότητας και της αποτελεσματικότητας. Είτε είστε έμπειρος επαγγελματίας είτε αρχάριος, το ιστολόγιο του Michael προσφέρει πολύτιμες πληροφορίες και πρακτικές συμβουλές για να αξιοποιήσετε στο έπακρο αυτά τα βασικά εργαλεία λογισμικού.