Combobox exit funktioniert nicht
14.01.2009 08:53:38
Stefan
ich habe ein Problem mit meiner Userform. Diese enthält eine Combobox "Hubraum" und einen CommandButton "Speichern". Die Eingabewerte in der Combobox möchte ich mit folgendem Code auf eine Nachkommastelle runden:
Private Sub cboHubraum_Exit(ByVal Cancel As MSForms.ReturnBoolean)
cboHubraum.Value = Round(cboHubraum.Value, 1)
End Sub
Dies funktioniert auch, so lange ich nach der Eingabe in die Combobox in eine andere Combobox klicke.
Wenn ich aber nach der Eingabe auf den CommandButton klicke (wobei eine neue Userform geöffnet wird) bleibt der ungerundete Wert stehen, obwohl ich ja trotzdem die Combobox verlassen habe.
Kann mir jemand sagen, was ich ändern muss, damit das Runden immer ausgeführt wird?
Gruß Stefan