Πώς να αλλάξετε κεφαλαία σε πεζά στο Microsoft Excel;
Ας υποθέσουμε ότι λαμβάνετε μια αναφορά Excel με όλες τις συμβολοσειρές κειμένου με κεφαλαία γράμματα, θα είναι ευκολότερο να διαβάσετε αν μπορείτε να αλλάξετε αυτά τα κεφαλαία γράμματα σε πεζά στο Excel όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης. Τα ακόλουθα κόλπα μπορούν να αλλάξουν γρήγορα όλα τα κεφαλαία γράμματα σε πεζά στο Excel.
Μέθοδος 1: Το Excel λειτουργεί για να αλλάξει κείμενο σε πεζά
Μέθοδος 2: Λειτουργία Flash Fill για αλλαγή κειμένου σε πεζά
Μέθοδος 1: Το Excel λειτουργεί για να αλλάξει κείμενο σε πεζά
Το Microsoft Excel υποστηρίζει τη λειτουργία "Κάτω" για να αλλάξει κάθε είδους συμβολοσειρές κειμένου σε πεζά, κάντε το ως εξής:
1. Στο παρακείμενο κενό κελί D1, εισαγάγετε ή αντιγράψτε τον τύπο
και πατήστε το πλήκτρο εισάγετε κλειδί για να πάρει το πρώτο αποτέλεσμα. Δείτε το στιγμιότυπο οθόνης:
2. Στη συνέχεια, επιλέξτε το κελί D1 και σύρετε τη λαβή πλήρωσης προς τα κάτω στα κελιά όπου θέλετε να εφαρμόσετε αυτόν τον τύπο και όλες οι συμβολοσειρές κειμένου έχουν μετατραπεί σε πεζά γράμματα, δείτε το στιγμιότυπο οθόνης:
3. Και στη συνέχεια, πρέπει να αντιγράψετε τα κελιά που έχουν μετατραπεί και να τα επικολλήσετε στα αρχικά κελιά με τη μορφή τιμών όπως χρειάζεστε.
:
Για να μετατρέψετε τις συμβολοσειρές κειμένου σε κεφαλαία, εφαρμόστε αυτόν τον τύπο:
Για να μετατρέψετε τις συμβολοσειρές κειμένου σε σωστή περίπτωση που σημαίνει κεφαλαιοποίηση του πρώτου γράμματος κάθε λέξης, εφαρμόστε αυτόν τον τύπο:
Μέθοδος 2: Λειτουργία Flash Fill για αλλαγή κειμένου σε πεζά
Στο Excel 2013 και σε νεότερη έκδοση, υπάρχει ένα εύχρηστο βοηθητικό πρόγραμμα - Flash Fill, με αυτήν τη δυνατότητα, μπορείτε επίσης να επιλύσετε γρήγορα αυτήν την εργασία.
1. Εισαγάγετε μια κενή στήλη δίπλα στα δεδομένα σας που θέλετε να αλλάξετε και, στη συνέχεια, εισαγάγετε την πρώτη συμβολοσειρά κειμένου που θέλετε να χρησιμοποιήσετε. Για παράδειγμα, θα πληκτρολογήσω τη συμβολοσειρά κειμένου με πεζά στο κελί B2, δείτε το στιγμιότυπο οθόνης:
2. Αφού πληκτρολογήσετε τη σωστή μορφοποιημένη συμβολοσειρά κειμένου και, στη συνέχεια, επιλέξτε την και, στη συνέχεια, κάντε κλικ στο Αρχική > Γέμισμα > Γεμίστε το φλαςκαι τα υπόλοιπα κελιά σε αυτήν τη στήλη θα γεμίσουν με πεζά συμβολοσειρές κειμένου, δείτε το στιγμιότυπο οθόνης:
:
1. Για να λάβετε όλο το κεφαλαίο κείμενο, πληκτρολογήστε το κεφαλαίο κείμενο στο πρώτο κελί και, στη συνέχεια, εφαρμόστε το Flash Fill λειτουργία;
2. Για να λάβετε όλο το σωστό κείμενο, πληκτρολογήστε τις συμβολοσειρές κειμένου με κεφαλαίο γράμμα για κάθε λέξη στο πρώτο κελί και, στη συνέχεια, εφαρμόστε το Flash Fill λειτουργία;
Μέθοδος 3: Κωδικός VBA για αλλαγή κειμένου σε πεζά
Οι παρακάτω κωδικοί VBA μπορούν επίσης να σας βοηθήσουν να αλλάξετε τις περιπτώσεις συμβολοσειράς κειμένου ανάλογα με τις ανάγκες σας και τα αποτελέσματα που έχουν μετατραπεί θα αντικατασταθούν απευθείας από τις αρχικές τιμές.
1. Κρατήστε πατημένο το Alt + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
2. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο παράθυρο της ενότητας.
Κωδικός VBA: Αλλαγή συμβολοσειρών κειμένου σε πεζά:
Sub LCase()
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)
For Each Rng In WorkRng
Rng.Value = VBA.LCase(Rng.Value)
Next
End Sub
3. Και μετά, πατήστε F5 για να εκτελέσετε αυτόν τον κώδικα, στο αναδυόμενο πλαίσιο προτροπής, επιλέξτε το εύρος του κελιού που θέλετε να μετατρέψετε την υπόθεση, δείτε το στιγμιότυπο οθόνης:
4. Στη συνέχεια, κάντε κλικ στο κουμπί OK κουμπί και όλες οι συμβολοσειρές κειμένου στα επιλεγμένα κελιά έχουν μετατραπεί σε πεζά, δείτε το στιγμιότυπο οθόνης:
:
Αλλάξτε τις συμβολοσειρές κειμένου σε κεφαλαία γράμματα, αντιγράψτε και επικολλήστε αυτόν τον κώδικα VBA στην Ενότητα:
Sub UCase()
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)
For Each Rng In WorkRng
Rng.Value = VBA.UCase(Rng.Value)
Next
End Sub
Κεφαλαιοποιήστε το πρώτο γράμμα κάθε λέξης, αντιγράψτε και επικολλήστε αυτόν τον κώδικα VBA στην Ενότητα:
Sub ProperCase()
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)
For Each Rng In WorkRng
Rng.Value = Application.WorksheetFunction.Proper(Rng.Value)
Next
End Sub
Μέθοδος 4: Kutools για Excel για αλλαγή κειμένου σε πεζά
Εάν έχετε Kutools για Excel εγκατεστημένο, αυτό Αλλαγή περίπτωσης Το εργαλείο μπορεί να σας βοηθήσει να αλλάξετε όλες τις συμβολοσειρές κειμένου σε πεζά, κεφαλαία, σωστή πεζά, κεφαλαία και εναλλαγή πεζών σε κελιά απευθείας. Κάντε κλικ για λήψη του Kutools για Excel! Δείτε παρακάτω την επίδειξη:
Μετά την εγκατάσταση Kutools για Excel, κάντε το ως εξής:
1. Επιλέξτε τα κελιά που θέλετε να αλλάξετε πεζά και, στη συνέχεια, κάντε κλικ στο Kutools > Κείμενο > Αλλαγή περίπτωσης, δείτε το στιγμιότυπο οθόνης:
2. Στην Αλλαγή περίπτωσης , επιλέξτε πεζά και, στη συνέχεια, κάντε κλικ στο OK or Εφαρμογή κουμπί, όλες οι συμβολοσειρές κειμένου έχουν μετατραπεί σε πεζά που θέλετε, δείτε το στιγμιότυπο οθόνης:
Συμβουλές: Αυτός ο διαλογισμός στα Αλλαγή περίπτωσης Το βοηθητικό πρόγραμμα μπορεί επίσης να σας βοηθήσει να αλλάξετε τις συμβολοσειρές κειμένου σε κεφαλαία, σωστή πεζά, κεφαλαία και εναλλαγή πεζών όπως χρειάζεστε.
Απασχολημένη δουλειά το Σαββατοκύριακο, Χρήση Kutools για Excel,
σας δίνει ένα χαλαρωτικό και χαρούμενο Σαββατοκύριακο!
Το σαββατοκύριακο, τα παιδιά ζητούν να βγουν έξω για να παίξουν, αλλά υπάρχει πάρα πολλή δουλειά που σας περιβάλλει για να έχετε χρόνο να συνοδεύσετε την οικογένεια. Ο ήλιος, η παραλία και η θάλασσα τόσο μακριά; Kutools για Excel σας βοηθά να λύστε παζλ του Excel, εξοικονομήστε χρόνο εργασίας.
- Λάβετε μια προσφορά και η αύξηση του μισθού δεν είναι πολύ μακριά.
- Περιέχει προηγμένες λειτουργίες, επίλυση σεναρίων εφαρμογών, ορισμένες λειτουργίες εξοικονομούν ακόμη και 99% χρόνο εργασίας.
- Γίνετε ειδικός του Excel σε 3 λεπτά και αποκτήστε αναγνώριση από τους συναδέλφους ή τους φίλους σας.
- Δεν χρειάζεται πλέον να αναζητάτε λύσεις από το Google, αντίο σε επώδυνες φόρμουλες και κώδικες VBA.
- Όλες οι επαναλαμβανόμενες λειτουργίες μπορούν να ολοκληρωθούν με μόνο μερικά κλικ, ελευθερώστε τα κουρασμένα χέρια σας.
- Μόνο 39 $ αλλά αξίζει από το σεμινάριο Excel των $ 4000 των άλλων.
- Επιλέξτε από 110,000 ελίτ και 300+ γνωστές εταιρείες.
- Δωρεάν δοκιμαστική περίοδο 30 ημερών και πλήρη επιστροφή χρημάτων εντός 60 ημερών χωρίς κανένα λόγο.
- Αλλάξτε τον τρόπο που εργάζεστε και μετά αλλάξτε τον τρόπο ζωής σας!