Sub Gerald1()
If Application.IsNumber(Range("A1").Value) = True Then
MsgBox "Das ist ein Zahlen-String !"
Else
MsgBox "Das ist kein Zahlen-String !"
End If
End Sub
Sub Gerald2()
If IsNumeric(Range("A1").Value) = True Then
MsgBox "Das ist ein Zahlen-String !"
Else
MsgBox "Das ist kein Zahlen-String !"
End If
End Sub
Um zu überprüfen, ob ein String nur aus Zahlen oder Buchstaben besteht, kannst Du die folgenden Schritte in Excel VBA befolgen:
ALT + F11 drückst.Sub CheckString()
Dim DeinString As String
DeinString = InputBox("Gib den String ein:")
If Application.IsNumber(DeinString) Then
MsgBox "Das ist ein Zahlen-String!"
Else
MsgBox "Das ist kein Zahlen-String!"
End If
End SubProblem: Die Funktion IsNumeric gibt true für leere Zellen zurück.
Application.IsNumber(), um sicherzustellen, dass eine leere Zelle nicht als numerisch zählt.Problem: Strings wie "1A1" führen nicht zu einer Meldung.
IsNumeric erkennt "1A1" nicht als Zahl.Eine eigene Funktion zu schreiben, kann oft hilfreich sein. Hier ist ein Beispiel, um einen String auf Buchstaben zu prüfen:
Function IsOnlyLetters(ByVal str As String) As Boolean
IsOnlyLetters = True
Dim i As Integer
For i = 1 To Len(str)
If Not Mid(str, i, 1) Like "[A-Za-z]" Then
IsOnlyLetters = False
Exit Function
End If
Next i
End FunctionDiese Funktion gibt True zurück, wenn der String nur aus Buchstaben besteht, andernfalls False.
Beispiel 1: Überprüfung eines Strings auf numerischen Inhalt:
If IsNumeric("12345") Then
MsgBox "Es sind nur Zahlen!"
End IfBeispiel 2: Verwendung der IsOnlyLetters-Funktion:
If IsOnlyLetters("HelloWorld") Then
MsgBox "Der String besteht nur aus Buchstaben!"
End IfDim letter As String
letter = Chr(65) ' ergibt "A"1. Wie kann ich überprüfen, ob ein String nur aus Buchstaben besteht?
Du kannst die oben gezeigte IsOnlyLetters-Funktion verwenden, um Strings auf Buchstaben zu überprüfen.
2. Was passiert mit Sonderzeichen oder Leerzeichen? Diese müssen in Deiner eigenen Logik definiert werden. In dem Beispiel, das die Buchstabenerkennung behandelt, wurden nur A-Z und a-z berücksichtigt.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen