Eine ComboBox treibt mich zum Irrsinn?
21.11.2005 22:32:44
Peter
es gibt eine ComboBox auf einer Userform, die mich zum Wahnsinn treibt. Mit nachstehendem Code übergebe ich den Inhalt der ComboBox3 an eine Tabelle; schreibe ich in die ComboBox z.B. 1,13 wird nach Verlassen der Box daraus 1,13 % und genau dieser Wert steht danach in Zelle F23 der Tabelle. So weit so gut
Private Sub ComboBox3_AfterUpdate()
If ComboBox3 = "" Then
ComboBox3 = 0 & ",00 %"
Else: ComboBox3 = ComboBox3 & " %"
End If
Sheets("Gesamtaufstellung").Range("F23") = ComboBox3
FinBox1 = Sheets("Gesamtaufstellung").Range("J49")
End Sub
Genau den gleichen Code verwende ich für ComboBox4 und Zelle F25 der gleichen Tabelle. Schreibe ich 1,13 wird nach Verlassen der Box daraus 1,13 % und in F25 steht dann 1,13 % % und ich bekomme natürlich für weitere Felder den Fehler #Wert?
Woran kann das liegen?
Vielen Dank
Peter S.