Συμμετοχή σε συμβολοσειρές | Αριστερά | Δεξιά | Μέση | Λεν | Instr
Σε αυτό το κεφάλαιο, θα βρείτε τις πιο σημαντικές λειτουργίες χειρισμός συμβολοσειρών σε Excel VBA.
Τοποθετήστε ένα κουμπί εντολών στο φύλλο εργασίας σας και προσθέστε τις γραμμές κώδικα παρακάτω. Για να εκτελέσετε τις γραμμές κώδικα, κάντε κλικ στο κουμπί εντολών στο φύλλο.
Εγγραφείτε στο Strings
Χρησιμοποιούμε τον τελεστή & για να συνδέσουμε συμβολοσειρές.
Κώδικας:
Χαμηλό κείμενο 1 ως συμβολοσειρά, κείμενο 2 ως συμβολοσειρά
text1 = "Γεια"
text2 = "Tim"
MsgBox text1 & "" & text2
Αποτέλεσμα:
Σημείωση: για να εισαγάγετε ένα κενό, χρησιμοποιήστε το ""
Αριστερά
Για να εξαγάγετε τους πιο αριστερούς χαρακτήρες από μια συμβολοσειρά, χρησιμοποιήστε Αριστερά.
Κώδικας:
Χαμηλό κείμενο ως συμβολοσειρά
κείμενο = "παράδειγμα κειμένου"
MsgBox Αριστερά (κείμενο, 4)
Αποτέλεσμα:
σωστά
Για να εξαγάγετε τους πιο δεξιούς χαρακτήρες από μια συμβολοσειρά, χρησιμοποιήστε το Δεξί. Μπορούμε επίσης να εισάγουμε απευθείας κείμενο σε μια συνάρτηση.
Κώδικας:
MsgBox Right ("παράδειγμα κειμένου", 2)
Αποτέλεσμα:
Στα μέσα
Για να εξαγάγετε μια υποχορδή, ξεκινώντας από τη μέση μιας συμβολοσειράς, χρησιμοποιήστε Mid.
Κώδικας:
MsgBox Mid ("παράδειγμα κειμένου", 9, 2)
Αποτέλεσμα:
Σημείωση: ξεκίνησε στη θέση 9 (t) με μήκος 2. Μπορείτε να παραλείψετε το τρίτο όρισμα εάν θέλετε να εξαγάγετε μια υπο -συμβολοσειρά ξεκινώντας από τη μέση μιας συμβολοσειράς, μέχρι το τέλος της συμβολοσειράς.
Λεν
Για να λάβετε το μήκος μιας συμβολοσειράς, χρησιμοποιήστε το Len.
Κώδικας:
MsgBox Len ("παράδειγμα κειμένου")
Αποτέλεσμα:
Σημείωση: ο χώρος (θέση 8) περιλαμβάνεται!
Instr
Για να βρείτε τη θέση μιας υποχορδής σε μια συμβολοσειρά, χρησιμοποιήστε το Instr.
Κώδικας:
MsgBox Instr ("παράδειγμα κειμένου", "πμ")
Αποτέλεσμα:
Σημείωση: η συμβολοσειρά "am" βρίσκεται στη θέση 3. Επισκεφθείτε τη σελίδα μας σχετικά με τη λειτουργία Instr για περισσότερες πληροφορίες και παραδείγματα.
