UserForm und Textbox (falshe Zahlenformat)
06.09.2004 19:33:41
Koznako
Ich habe folgendes Problem mit UserForm und Textbox.
Ich screibe in Tabellenblatt mit unterstehende Code:
e1.Text = Cells(e, 2).Value
le1.Caption = Cells(1, 2).Value
Private Sub e1_Change()
If Datum.ListIndex = -1 Then Exit Sub
Cells(e, 2).Value = e1.Text
End Sub
e1 = TextBox
le1 = Label
Datum = ListBox
Es Funktioniert so weit aber wenn Wert zB. 25,66 ist dann wird in Tabelle als Text formatiert und natürlich nicht berechnet mit anderen Werten.
Wenn eingetragene Wert zB. 25,6897 ist dann wird es als 256897,00 erkannt.
Kann mir hier bitte, jemand helfen?
Danke in voraus.
Gruß Koznako
Anzeige