MoinMoin
Ich habe als Anfänger VBA schon einiges aus dem Forum gelernt und bin bisher gut weitergekommen. Jetzt verzweifele ich allerdings :
Ich habe eine Useform für eine Fuhrparverwaltung erstellt, in der auch die Fahrzeuggewichte eine Rolle spielen.
Dazu habe ich zwei Eingabe/Textboxen erstellt TxtZulGesamtgewicht und TxtNutzlast.
Dann habe ich eine Bedingung erstellt
ZulässigesGesamtgewichteingeben:
If TxtZulGesamtgewicht = "" Then MsgBox " Bitte zulässiges Gesamtgewicht in KG eingeben", vbOKOnly, "Gesamtgewicht": GoTo fehler1
Rem GoTo Nutzlasteingeben
Nutzlasteingeben:
If TxtNutzlast = "" Or TxtNutzlast >= TxtZulGesamtgewicht Then MsgBox " Bitte Nutzlast eingeben, nicht größer als das zulässige Gesamtgewicht", vbOKOnly, "Nutzlast": GoTo fehler1
Rem GoTo KmStandeingeben
Der Zweck ist, keine Fehleingaben machen.
Sobald ich bei Txtnutzlast einen Wert unter 1000 eingebe, kommt immer der Hinweis der MsgBox.
Was mache ich Falsch?