Vergleich läuft falsch
13.01.2005 15:04:08
Reinhold
also ich hab ein Problem das ich mir nich erklären kann. Es geht um dieses Makro.
Private Sub TextBox6_Change()
If TextBox6.Value > TextBox4.Value And TextBox6.Value <> "" Then
MsgBox "Der Wert muss kleiner " & TextBox4.Value & " sein.", _
vbOKOnly + vbInformation, "Bitte Schaltfläche betätigen."
TextBox6.Value = TextBox4.Value
End If
End Sub
Ich habs getestet sogar mit Debugger es klappt nicht. Z.B. wenn in TB4 der wert 200 ist und ich in TB6 den wert 5 eingebe dann meint das Programm der wert 5 sei größer 200 was stimmt da nicht? Sogar bei der Überwachung stehen die Werte 200 und 5.
Bitte um hilfe.
Grüße Reinhold