seychellesartprojects.org

Λειτουργία Excel VBA LCase

Το LCase είναι μια ενσωματωμένη συνάρτηση στο vba που χρησιμοποιείται για τη μετατροπή μιας συμβολοσειράς εισόδου που παρέχεται σε αυτό με πεζά γράμματα, παίρνει ένα μόνο όρισμα που είναι η συμβολοσειρά ως είσοδο και η έξοδος που δημιουργείται από αυτήν τη συνάρτηση είναι μια συμβολοσειρά, το ένα πράγμα που πρέπει να διατηρηθεί στο μυαλό είναι ότι αυτή η συνάρτηση μετατρέπει όλη τη συνάρτηση σε πεζά και όχι μόνο έναν χαρακτήρα.

Πρέπει να έχετε δοκιμάσει τον ίδιο τύπο (LOWER) με το Excel στο VBA και δεν το έχετε βρει. Επειδή στο VBA το πεζά ονομάζεται ελαφρώς διαφορετικό. Στο VBA είναι το όνομα συντόμευσης, δηλαδή "LCASE". Εδώ το "L" σημαίνει "LOWER", οπότε ο τύπος γράφει "LOWERCASE".

Σύνταξη

• String: δεν είναι τίποτα άλλο από την τιμή κειμένου που προσπαθούμε να μετατρέψουμε σε πεζά. Μπορούμε να παρέχουμε το κείμενο απευθείας στον τύπο, μπορεί να είναι μια αναφορά κελιού και μπορεί επίσης να γίνεται μέσω μεταβλητής.

Πώς να μετατρέψετε κείμενο σε πεζά στο VBA;

Μπορείτε να κάνετε λήψη αυτού του προτύπου VBA LCase Excel εδώ - Πρότυπο VBA LCase Excel

Παράδειγμα # 1

Ας προσπαθήσουμε να μετατρέψουμε την τιμή κειμένου "Hello Good Morning" σε πεζά χρησιμοποιώντας τη συνάρτηση LCASE.

Βήμα 1: Ξεκινήστε την υποδιαδικασία ονομάζοντας τη μακροεντολή excel.

Κώδικας:

 Υπο LCase_Example1 () End Sub 

Βήμα 2: Δηλώστε τη μεταβλητή k ως String.

Κώδικας:

 Υπο LCase_Example1 () Dim k As String End Sub 

Βήμα 3: Αντιστοιχίστε την τιμή στη μεταβλητή "k" εφαρμόζοντας τη συνάρτηση "LCASE".

Βήμα 4: Εδώ είναι η επιθυμητή τιμή κειμένου που προσπαθούμε να μετατρέψουμε σε πεζά και η επιθυμητή τιμή συμβολοσειράς είναι "Γεια σας Καλημέρα"

Κώδικας:

 Υπο LCase_Example1 () Dim k As String k = LCase ("Hello Good Morning") End Sub 

Βήμα 5: Τώρα δείξτε το αποτέλεσμα της μεταβλητής "k" στο πλαίσιο μηνύματος.

Κώδικας:

 Υπο LCase_Example1 () Dim k As String k = LCase ("Hello Good Morning") MsgBox k End Sub 

Εντάξει, η κωδικοποίηση έγινε. Ας τρέξουμε τον κώδικα για να δούμε το αποτέλεσμα.

Έτσι η LCase μετέτρεψε την τιμή κειμένου «Γεια σας Καλημέρα» σε «γεια σας καλημέρα» με την απλή τεχνική κωδικοποίησης.

Παράδειγμα # 2

Έχουμε δει πώς λειτουργεί η λειτουργία LCASE στο VBA. Στο παραπάνω παράδειγμα, παρέχουμε απευθείας την τιμή στον ίδιο τον τύπο. Τώρα θα δούμε πώς μπορούμε να χρησιμοποιήσουμε την τιμή αναφοράς κελιού στον τύπο.

Ας υποθέσουμε ότι έχετε τη λέξη "Γεια σας Καλημέρα" στο κελί Α1 όπως η παρακάτω εικόνα.

Βήμα 1: Θα μετατρέψουμε την τιμή κελιού A1 με πεζά δείχνοντας το αποτέλεσμα στο κελί Range B1, οπότε ο κωδικός θα είναι Range ("B1")

Κώδικας:

 Sub LCase_Example2 () Range ("B1"). Value End Sub 

Βήμα 2: Στο κελί B1 έως τη λειτουργία LCASE θα αποθηκεύσουμε το αποτέλεσμα, οπότε ανοίξτε τη συνάρτηση.

Βήμα 3: Σε αυτό το παράδειγμα, η τιμή συμβολοσειράς VBA είναι μια αναφορά κελιού, όχι άμεση τιμή. Δώστε λοιπόν την αναφορά κελιού ως Range ("A1").

Κώδικας:

 Sub LCase_Example2 () Range ("B1"). Value = LCase (Range ("A1"). Value) End Sub 

Λοιπόν, εντάξει τελειώσαμε με το τμήμα κωδικοποίησης VBA. Εκτελέστε τον κωδικό και δείτε τη μαγεία στο κελί B1.

Παράδειγμα # 3

Η μετατροπή μιας μόνο τιμής κυψέλης ή μιας άμεσης τιμής δεν είναι η μεγαλύτερη πρόκληση. Όταν πρέπει να ασχοληθούμε με τον αριθμό τιμών "n" στο φύλλο εργασίας, τότε πρέπει να εφαρμόσουμε βρόχους για να βρούμε όλα τα κελιά και να τα μετατρέψουμε σε πεζά.

Ας υποθέσουμε παρακάτω είναι τα δεδομένα που έχετε σε ένα φύλλο εργασίας excel.

Εάν δεν γνωρίζετε τους βρόχους, τότε πρέπει να επιστρέψετε στα βασικά στοιχεία της κωδικοποίησης VBA, ανατρέξτε στα άρθρα μας σχετικά με το "VBA Loops" για να έχετε αρκετή γνώση σχετικά με τους βρόχους. Ο παρακάτω κωδικός θα μετατρέψει τα παραπάνω ονόματα σε πεζά.

Κώδικας:

 Υπο LCase_ Παράδειγμα3 () Dim k Όσο για k = 2 έως 8 κελιά (k, 2). Τιμή = LCase (κελιά (k, 1). Αξία) Επόμενο k End Sub 

Αυτό θα μετατρέψει όλες τις τιμές κειμένου από τη σειρά 2 σε σειρά 8 στη πεζά συνάρτηση.

Με βάση τα κελιά σας, μπορείτε να αυξήσετε το όριο του βρόχου από 8 σε οποιονδήποτε αριθμό τελευταίας σειράς των δεδομένων σας.