Office: Probleme mit Bestandsüberwachung; Wenn TextBox2 > ComboBo

Hallo miteinander,

habe folgende Anweisung geschrieben, damit es nicht möglich ist, dass bei der Eingabe einer Zahl ( Menge ), der Bestand überschritten wird. Jetzt schaltet sich jedoch auch die Warnbox ein, wenn ich als Bestand in meiner ComboBox61 die 10 drinstehen hab, und ich in die TextBox2 eine 2 oder > eingebe.
Diese Warnbox sollte in diesem Fall jedoch erst ab der Mengeneingabe 11
oder > erscheinen.
Sieht jemand von Euch hier das Problem?
Vielleicht bin ich schon blind vor lauter Tippen? :-)



'BESTANDSPRÃœFUNG, OB EINGEGEBENE ZAHL NICHT > DES WARENBESTANDS?
'WENN TEXTBOX2 NICHT LEER IST UND WERT DER TEXTBOX2 > DEM WERT DER COMBOBOX61 UND DIE AUSWAHLBOXKLIENT1 "NEUE RECHNUNG ERSTELLEN" ODER "NEUE PROVISIONSABRECHNUNG ERSTELLEN" HEISST, DANN.....

If TextBox2 > "" And TextBox2.Value > ComboBox61.Value And (AuswahlBoxKlient1 = "Neue Rechnung erstellen" Or AuswahlBoxKlient1 = "Neue Provisionsabrechnung erstellen") Then

'BLEIBT TEXTBOX2 LEER, UND
TextBox2.Value = ""

'COMBOBOX49 BLEIBT LEER, UND
ComboBox49 = ""

'WARNTON ERTÖNT UND
Beep

'HINWEISFENSTER ÖFFNET SICH MIT
BestandÃœberschritten.Show 'HINWEISTEXT: WARENBESTAND ÃœBERSCHRITTEN!

'ENDE
End If

Danke im Voraus!

 

Hallo!

Ich glaube, eine Textbox liefert immer Text zurück. Und da Text immer größer ist als eine Zahl, ist der Ausdruck "TextBox2.Value > ComboBox61.Value" immer WAHR.
Daher solltest du vielleicht versuchen, den TextBox-Wert noch in eine Zahl umwandeln; mit CLng oder CDbl oder...

 

Vielen Dank, Schatzi!

Mittels "CDbl(........ .Value)" schaut's wirklich besser aus! Musste allerdings noch eine "If IsNumeric(....... .Value) = False Then" einbauen, damit wirklich nur Zahlen eingegeben werden. Anderenfalls gibt's Fehlermeldungen!

Gruß timi