Es ist üblich, gemischte Daten aus dem Benutzer , wie Buchstaben und Zahlen in einer Variablen abzurufen. Ein Programmierer müssten dann die Zahlen von dieser Variablen zu extrahieren und sie als notwendig. In Visual Basic for Applications (VBA) , können Sie mit dem " IsNumberic "-Funktion , um zu überprüfen , ob ein Ausdruck als Zahl ausgewertet werden kann. Wenn der Ausdruck enthält nur Zahlen , gibt die Funktion "true". Aber wenn es Buchstaben und Zahlen enthält , wird der Ausdruck zurückzukehren " falsch". Anleitung
1

Neues Sub-Prozedur , um für eine Reihe in einem String , indem Sie den folgenden Code prüfen :

Private Sub checkForNumber ()
2

Declare zwei Variablen ein , um den String mit Zahlen und Buchstaben und die andere für einzelne Zeichen zu halten, wie in der folgenden :

Dim strVar As String Dim

oneChar As String

strVar = " 12 sdf 3456 "
3

Fügen Sie den folgenden Code, um eine Schleife durch jedes Zeichen in der Zeichenfolge. Überprüfen Sie für Zahlen und zeigt sie durch das Direkt-Fenster :

Do While strVar <> ""

oneChar = Left ( strVar , 1) german

strVar = Right ( strVar , Len ( strVar ) - 1) german

Wenn IsNumeric ( oneChar ) Dann

Debug.Print ( oneChar )

End If

Schleife

4

Beenden Sie den Vorgang , indem Sie " End Sub " und drücken Sie "Strg" und "G" die sofortige Fenster anzuzeigen. Drücken Sie auf " F5 ", um den Code auszuführen.