Die Funktion VBA Val gibt die in einer Zeichenfolge enthaltenen Zahlen zurück, bis sie ein nicht numerisches Zeichen findet.
Diese Funktion akzeptiert nur „.“ als Dezimaltrennzeichen.
Val(text)
Verwenden der Funktion Val, um Zeichenfolgen mit verschiedenen Zeichen als Zahl zurückzugeben:
Sub ValExample() MsgBox Val("1") 'Rückgabe: 1 MsgBox Val(" 1 ") 'Rückgabe: 1 MsgBox Val(1) 'Rückgabe: 1 MsgBox Val("1h") 'Rückgabe: 1 MsgBox Val("h1") 'Rückgabe: 0 MsgBox Val("1 number") 'Rückgabe: 1 MsgBox Val("number 1") 'Rückgabe: 0 MsgBox Val("2 2") 'Rückgabe: 22 MsgBox Val("2.2") 'Rückgabe: 2.2 MsgBox Val("2,2") 'Rückgabe: 2 MsgBox Val("75000 Kyiv") 'Rückgabe: 75000 MsgBox Val("Kyiv 75000") 'Rückgabe: 0 MsgBox Val("Excel") 'Rückgabe: 0 End Sub