(vba) Rückgabe auf Format prüfen

Computer: Software & Programmierung Office Software
1

Hi Experten,

ich bin gerade dabei ein paar kleine Aufgaben zusammenzustellen…
dabei bräuchte ich jetzt die Möglichkeit ein Makro abzubrechen, wenn der Inhalt einer Variablen (die zuvor per inputbox gegeben wurde) keine Zahl ist.
ein if variable > 0 hat leider nicht zum gewünschten Ergebnis geführt…
Wie kann ich das denn prüfen?

Vielen Dank für eure Hilfe
Munich

2

Hi Munich
Var 1: Prüft ob Zahl in Zelle A1, wobei leer als NULL gilt!

Sub Zahlwert()
If IsNumeric([A1].Value) Then
MsgBox ("ZAHL")
End If
End Sub

Var2: wenn nur Zahlen grösser Null erlaubt sind

Sub Zahlwert()
If IsNumeric([A1].Value) Then
If [A1].Value \> 0 Then
MsgBox ("ZAHL")
End If
End If
End Sub

Das wars schon
Erich