Πώς να καθαρίσει ένα String σε VBA

Ως Visual Basic for Applications προγραμματιστής , θα πρέπει να είναι σε θέση να αφαιρέσει αριθμούς ή χαρακτήρες σε strings για να εμφανίσετε τις σωστές πληροφορίες για τον χρήστη . Στην VBA , μπορείτε να χρησιμοποιήσετε τη λειτουργία " Περικοπή " για να αφαιρέσετε τυχόν κενά στην αρχή και το τέλος μιας συμβολοσειράς. Η « Αριστερά » και « Δεξιά » λειτουργίες που χρησιμοποιούνται για να επιστρέψει ένα συγκεκριμένο αριθμό χαρακτήρων από την αριστερή ή τη δεξιά πλευρά μιας συμβολοσειράς. Η λειτουργία "Αντικατάσταση" επιστρέφει ένα string στο οποίο ένα συγκεκριμένο substring έχει αντικατασταθεί με ένα άλλο . Οδηγίες
Η 1

Ξεκινήστε πληκτρολογώντας τα παρακάτω, για να δημιουργήσετε ένα νέο VBA διαδικασία ρουτίνας :

Private Sub cleanString ( ) 2

Δημιουργία και ορίσετε μια μεταβλητή με ένα string :

Dim StrVar Όπως String

StrVar = " 2Αφαιρέστε αριθμών και χαρακτήρων 432 * % από αυτό string.33 "
εικόνων 3

Τύπος τα παρακάτω για να αφαιρέσετε τους διαστημικούς χαρακτήρες στην αρχή και το τέλος του string :

StrVar = Trim ( StrVar )

Πληκτρολογήστε την ακόλουθη απομάκρυνση του " 33 " από το τέλος του string :

StrVar = Left ( StrVar , Len ( StrVar ) - 2 )
Η 4

Πληκτρολογήστε τα παρακάτω για να αφαιρέσετε " 2 " από την αρχή του string :

StrVar = Δεξιά ( StrVar , Len ( StrVar ) - 1 )
5

Πληκτρολογήστε το παρακάτω, για να αρθούν τα « 432 % * " από τη σειρά :

StrVar = Αντικατάσταση ( StrVar , " 432 * % " , " " )
Η 6

Πληκτρολογήστε το παρακάτω για να αντικαταστήσει ένα χαρακτήρα διπλών χώρο με ένα ενιαίο χώρο στη σειρά :

StrVar = Αντικατάσταση ( StrVar , " " , " " )
Η 7

οθόνης ένα πλαίσιο μηνύματος με την τελική σειρά πληκτρολογώντας τα ακόλουθα :

MsgBox StrVar
Τετάρτη 8

Τύπος " End Sub " σε τερματίσετε τη διαδικασία σας και πατήστε "F5 " για να εκτελέσετε τον κώδικα VBA .
Η
εικόνων