Στο φύλλο εργασίας του Excel, η συνάρτηση UPPER μετατρέπει όλους τους μικρούς χαρακτήρες μιας συμβολοσειράς κειμένου σε κεφαλαία.
Υπάρχει μια παρόμοια λειτουργία που κάνει επίσης το ίδιο - το UCase λειτουργία.
Η συνάρτηση VBA UCase παίρνει μια συμβολοσειρά ως είσοδο και μετατρέπει όλους τους πεζούς χαρακτήρες σε κεφαλαία.
Σύνταξη της συνάρτησης VBA UCASE
Παρακάτω είναι η σύνταξη της συνάρτησης VBA UCase
UCase (συμβολοσειρά)
'Σειρά' είναι το κείμενο στο οποίο θέλετε να μετατρέψετε όλα τα πεζά σε κεφαλαία.
Μπορείτε να χρησιμοποιήσετε μια συμβολοσειρά κειμένου, μια αναφορά εύρους που περιέχει τη συμβολοσειρά κειμένου ή μια μεταβλητή που έχει τη συμβολοσειρά κειμένου.
Ας ρίξουμε μια ματιά σε μερικά παραδείγματα χρήσης της συνάρτησης UCase στο Excel VBA.
Παραδείγματα VBA UCase
Ο παρακάτω κώδικας θα μετατρέψει το καθορισμένο κείμενο σε κεφαλαία και στη συνέχεια θα εμφανίσει ένα πλαίσιο μηνυμάτων με αυτό το κείμενο.
Sub UCaseExample1 () MsgBox UCase ("Good Morning") End Sub
Παρακάτω είναι ένα άλλο παράδειγμα κώδικα VBA, όπου έχω χρησιμοποιήσει μια μεταβλητή ("Var") για να κρατήσω τη συμβολοσειρά κειμένου. Η συνάρτηση UCase χρησιμοποιείται στη συνέχεια για τη μετατροπή των πεζών χαρακτήρων σε κεφαλαία.
Sub UCaseExample2 () Dim Var As String Var = "Good Morning" MsgBox UCase (Var) End Sub
Ένα άλλο παράδειγμα παρακάτω δείχνει τον τρόπο λήψης της συμβολοσειράς από ένα κελί (Α1) και την εμφάνιση του κεφαλαίου κειμένου σε ένα πλαίσιο μηνυμάτων.
Sub UCaseExample3 () MsgBox UCase (Range ("A1")) End Sub
Ενώ όλα αυτά τα παραπάνω παραδείγματα λειτουργούν, είναι απίθανο να χρησιμοποιήσετε αυτήν τη συνάρτηση για απλή μετατροπή ή εμφάνιση της κεφαλαίας συμβολοσειράς.
Παρακάτω είναι ένα α πιο πρακτικό παράδειγμα της συνάρτησης UCase στο Excel VBA.
Ο παρακάτω κώδικας θα περάσει από όλα τα κελιά στο επιλεγμένο εύρος και θα μετατρέψει όλες τις συμβολοσειρές κειμένου σε πεζά.
Sub UCaseExample4 () Dim rng As Range Set rng = Επιλογή για κάθε κελί σε rng Cell.Value = UCase (Cell) Next Cell End Sub
Ακολουθούν μερικά σημαντικά πράγματα που πρέπει να γνωρίζετε για τη λειτουργία VBA UCase:
- Επηρεάζει μόνο τους πεζούς χαρακτήρες της συμβολοσειράς κειμένου. Οποιοσδήποτε άλλος χαρακτήρας εκτός από τους μικρούς χαρακτήρες κειμένου παραμένει αμετάβλητος. Αυτό σημαίνει ότι οι αριθμοί, οι ειδικοί χαρακτήρες και τα σημεία στίξης παραμένουν αμετάβλητα.
- Εάν χρησιμοποιείτε μηδενικό χαρακτήρα (ή αναφορά σε κενό κελί), θα επιστρέψει μηδενικός χαρακτήρας.
Άλλες χρήσιμες λειτουργίες Excel VBA:
- Λειτουργία VBA LCase.
- Λειτουργία VBA TRIM.
- Λειτουργία VBA INSTR.
- Λειτουργία VBA SPLIT.