Wenn ich in einer Userform in einer ComboBox "Ordinationen aktiviere,so erhalte ich in der aktiven Zelle den Eintrag 1 obwohl der richtige Eintrag "00001" wäre.
Private Sub Combobox1_Change()
Select Case ComboBox1
Case "Ordinationen"
ActiveCell.Value = 00001 Wenn ich in VBA "00001 eingebe so ändert sich hier der Wert automatisch auf 1.
Private Sub Combobox1_Change()
Select Case ComboBox1
Case "Ordinationen"
ActiveCell.Value = 1
Wie würde hier bitte der Formatbefehl lauten, ohner das ich vorher die Spalte dementsprechend benutzerdefiniert formatieren muß?
Private Sub Combobox1_Change()
Select Case ComboBox1
Case "Ordinationen"
ActiveCell.Value = Format(1, "00000") ?
Danke
Josef