Όταν εργάζεστε με συμβολοσειρές στο VBA, χρησιμοποιήστε vbNewLine, vbCrLf ή vbCR για να εισαγάγετε μια αλλαγή γραμμής / νέα παράγραφο.
Αυτό το άρθρο θα συζητήσει επίσης πώς να χρησιμοποιήσετε τον χαρακτήρα συνέχισης γραμμής για να συνεχίσετε μια δήλωση στον πραγματικό σας κώδικα VBA σε μια νέα γραμμή.
Χρήση του vbNewLine
Ο παρακάτω κώδικας σάς δείχνει πώς θα χρησιμοποιούσατε το vbNewLine για να βάλετε τη δεύτερη συμβολοσειρά κειμένου σε μια νέα γραμμή στο παράθυρο Άμεση:
| 1234567891011 | Sub UsingvbNewLine ()Dim StringOne As StringDim StringTwo As StringStringOne = "Αυτό είναι το String One"StringTwo = "Αυτό είναι το String Two"Debug.Print StringOne & vbNewLine & StringTwoΤέλος υπο |
Το αποτέλεσμα είναι:
Χρησιμοποιώντας το vbCrLf
Ο παρακάτω κώδικας σάς δείχνει πώς θα χρησιμοποιούσατε το vbCrLf για να βάλετε τη δεύτερη συμβολοσειρά κειμένου σε μια νέα γραμμή σε σχήμα:
| 123456789101112131415 | Sub UsingvbCrLf ()Dim StringOne As StringDim StringTwo As StringStringOne = "Αυτό είναι το String One"StringTwo = "Αυτό είναι το String Two"ActiveSheet.Shapes.AddShape (msoShapeRectangle, 15, 15, 100, 50). ΕπιλέξτεΜε Επιλογή.Characters.Text = StringOne & vbCrLf & StringTwoΤέλος μεΤέλος υπο |
Το αποτέλεσμα είναι:
Χρήση vbCR
Ο παρακάτω κώδικας σάς δείχνει πώς θα χρησιμοποιούσατε το vbCR για να βάλετε τη δεύτερη συμβολοσειρά κειμένου σε μια νέα γραμμή σε ένα πλαίσιο μηνυμάτων:
| 1234567891011 | Sub UsingvbCR ()Dim StringOne As StringDim StringTwo As StringStringOne = "Αυτό είναι το String One"StringTwo = "Αυτό είναι το String Two"MsgBox StringOne & vbCr & StringTwoΤέλος υπο |
Το αποτέλεσμα είναι:
Συνέχιση δήλωσης στο VBA
Μπορείτε να χρησιμοποιήσετε τον χαρακτήρα συνέχισης γραμμής ("_", γνωστός και ως υπογράμμιση) για να συνεχίσετε μια δήλωση από τη μία γραμμή στην επόμενη στον κωδικό VBA σας. Ο ακόλουθος κώδικας σάς δείχνει πώς να χρησιμοποιήσετε τον χαρακτήρα συνέχισης γραμμής:
| 12345 | Sub LineContinuation ()If Range ("b1"). Τιμή> 0 Τότε _Εύρος ("c1"). Τιμή = "Μεγαλύτερη από μηδέν"Τέλος υπο |
