Πώς να κεφαλαιοποιήσετε μόνο το πρώτο γράμμα ή το πρώτο γράμμα κάθε λέξης στο Excel;
Ας υποθέσουμε ότι έχετε μια λίστα συμβολοσειρών κειμένου που λέξεις είναι σε όλα τα κεφαλαία, πεζά ή αναμεμιγμένα με πεζά και κεφαλαία, σε αυτήν την περίπτωση, πρέπει να κάνετε το πρώτο γράμμα κάθε λέξης στο κελί να είναι κεφαλαίο και άλλα είναι πεζά ως εξής εμφανίζεται το στιγμιότυπο οθόνης. Έχετε καλούς τρόπους να κεφαλαιοποιήσετε ή να γράψετε κεφαλαία το πρώτο γράμμα κάθε λέξης για πολλά κελιά γρήγορα και εύκολα στο Excel;
Κεφαλαιοποιήστε το πρώτο γράμμα κάθε λέξης μέσα στο κελί με τον τύπο και τον κώδικα VBA
Κεφαλαιοποιήστε το πρώτο γράμμα μόνο εντός κελιού με τύπο
Κεφαλαιοποιήστε το πρώτο γράμμα κάθε λέξης ή το πρώτο γράμμα μόνο με το Kutools για Excel
Κεφαλαιοποιήστε το πρώτο γράμμα κάθε λέξης μέσα στο κελί με τον τύπο και τον κώδικα VBA
Για να κεφαλαιοποιήσετε το πρώτο γράμμα κάθε λέξης σε ένα κελί, μπορείτε να χρησιμοποιήσετε τη συνάρτηση Proper ή έναν απλό κώδικα VBA. Κάντε τα παρακάτω βήματα:
Μέθοδος 1: Σωστή λειτουργία:
1. Εισαγάγετε αυτόν τον τύπο: = ΑΚΙΝΗΤΟ (A2) σε ένα κενό κελί δίπλα στα δεδομένα σας, για παράδειγμα, B2, δείτε το στιγμιότυπο οθόνης:
2. Και, στη συνέχεια, σύρετε τη λαβή πλήρωσης προς τα κάτω στα κελιά που θέλετε να εφαρμόσετε αυτόν τον τύπο και μπορείτε να δείτε όλα τα πρώτα γράμματα κάθε λέξης στο κελί έχουν κεφαλαία. Δείτε το στιγμιότυπο οθόνης:
Μέθοδος 2: Κωδικός VBA:
Ο παρακάτω κώδικας VBA μπορεί επίσης να σας βοηθήσει να γράψετε με κεφαλαίο το πρώτο γράμμα κάθε λέξης σε ένα κελί.
1. Παρακαλώ κρατήστε πατημένο ALT + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
2. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Μονάδα μέτρησης Παράθυρο.
Κωδικός VBA: Κεφαλαιοποιήστε το πρώτο γράμμα κάθε λέξης σε ένα κελί
Sub Proper_Case()
'Updateby20150428
Dim x As Range
Dim Workx As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set Workx = Application.Selection
Set Workx = Application.InputBox("Range", xTitleId, Workx.Address, Type:=8)
For Each x In Workx
x.Value = Application.Proper(x.Value)
Next
End Sub
3. Στη συνέχεια πατήστε F5 για να εκτελέσετε αυτόν τον κώδικα και επιλέξτε το εύρος δεδομένων που θέλετε να χρησιμοποιήσετε στο αναδυόμενο παράθυρο διαλόγου, δείτε το στιγμιότυπο οθόνης:
4. Και στη συνέχεια κάντε κλικ στο κουμπί OK κουμπί, όλο το πρώτο γράμμα κάθε λέξης στα κελιά έχει κεφαλαιοποιηθεί.
Κεφαλαιοποιήστε μόνο το πρώτο γράμμα ή το πρώτο γράμμα κάθε λέξης σε κελιά συμβολοσειράς κειμένου
Με τη βοήθεια του Kutools για Excel 's Αλλαγή περίπτωσης βοηθητικό πρόγραμμα, μπορείτε να αλλάξετε γρήγορα τις συμβολοσειρές κειμένου σε κεφαλαία, πεζά, σωστά, κεφαλαία και ούτω καθεξής. Κάντε κλικ για λήψη του Kutools για Excel!
Κεφαλαιοποιήστε το πρώτο γράμμα μόνο εντός κελιού με τύπο
Μερικές φορές, θέλετε απλώς να γράψετε μόνο το πρώτο γράμμα και να γράψετε άλλους με κεφαλαία γράμματα στο κελί, αντιμετωπίζετε αυτό το πρόβλημα στο Excel; Στην πραγματικότητα, εδώ είναι ένας τύπος που μπορεί να σας βοηθήσει να λύσετε αυτό το έργο.
1. Πληκτρολογήστε αυτόν τον τύπο σε ένα κενό κελί εκτός από τα δεδομένα σας, = ΑΝΩ (ΑΡΙΣΤΕΡΑ (A2,1)) & ΧΑΜΗΛΟ (ΔΕΞΙΟ (A2, LEN (A2) -1)), δείτε το στιγμιότυπο οθόνης:
2. Στη συνέχεια, σύρετε τη λαβή πλήρωσης στο εύρος των κελιών που θέλετε να περιέχει αυτόν τον τύπο και μόνο το πρώτο γράμμα των κελιών έχει γίνει κεφαλαίο. Δείτε το στιγμιότυπο οθόνης:
Κεφαλαιοποιήστε το πρώτο γράμμα κάθε λέξης ή το πρώτο γράμμα μόνο με το Kutools για Excel
Εάν έχετε Kutools για Excel, Με τους Αλλαγή περίπτωσης δυνατότητα, μπορείτε να κεφαλαιοποιήσετε γρήγορα το πρώτο γράμμα κάθε λέξης και το πρώτο γράμμα μόνο σε ένα κελί.
Μετά το λήψη και εγκατάσταση Kutools για Excel, κάντε τα εξής:
1. Επιλέξτε το εύρος δεδομένων που θέλετε να χρησιμοποιήσετε.
2. Κλίκ Kutools > Κείμενο > Αλλαγή περίπτωσης, δείτε το στιγμιότυπο οθόνης:
3. Στην Αλλαγή περίπτωσης πλαίσιο διαλόγου, αν το επιλέξετε Σωστή θήκη, το πρώτο γράμμα κάθε λέξης θα είναι κεφαλαίο, δείτε το στιγμιότυπο οθόνης:
Εάν επιλέξετε Περίπτωση ποινής, μόνο το πρώτο γράμμα των συμβολοσειρών κειμένου κεφαλαιοποιείται ως εξής:
Κατεβάστε και δωρεάν δοκιμή Kutools για Excel τώρα!
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!