Ich habe in einer Userform eine ComboBox welche "-" und "+" zur Auswahl anbietet.
Wenn ich nun "-" auswähle soll in der Textbox der eingegebene Wert als Negativwert asugegeben werden.
Private Sub TextBox2_Change()
If Me.ComboBox2.Text = "-" Then Me.TextBox2.Text = CDbl(CInt(Me.TextBox2.Text) * (-1))
End Sub
Dies funktioniert bei Zahlen mit einer ungeraden Anzahl an Stellen (also -1 oder -121) aber bei Zaheln mit einer geraden Anzahl an Stellen (12 oder 1212) nicht.Kann jemand Helfen?
Vielen Dank.
Gruß
Philipp