Also ich habe eine Eingabe, string, wenn diese "Eingabe" eine Zahl ist soll sie in die variable "Zahl" gepackt werden, wenn nicht soll die Abfrage wiederholt werden.
Das wiederholen und alles kein problem, aber wie kann ich VBA prüfen lassen welcher Datentyp sich in "Eingabe" befindet (was der Benutzer eingegeben hat), bzw gibt es eine einfachere Möglichkeit zu überprüfen ob eine Zahl eingegeben wurde?
---------------------
Option Explicit
Dim Zahl As Integer
Dim Eingabe As String
Sub Prüfung()
Zahl = "ungefüllt"
While Zahl "ist ungefüllt"
Eingabe = InputBox("Geben Sie eine beliebige ganzzahlige Zahl ein")
If Eingabe "ist eine ganzzahl" Then
Zahl = Eingabe
Else
MsgBox ("Ihre Eingabe ist ungültig")
End If
Wend
End Sub
--------------------
Die in anführungszeichen gestellten sachen müssen ersetzt werden
(Damit will ich diesen komischen fehler in VBA verhindern, wo z.b. in eine Zahl Text eingegeben wird, und durch eine wiederholte Abfrage ersetzen)
|