Textbox soll Zahl ausgeben
18.01.2008 13:55:57
Jonatan
ich würde gerne, das was ich in eine Textbox eingebe als Zahl in eine Tabellenspalte schreiben.
Leider funktioniert das nicht, es kommt immer eine Null raus.
Da sollte aber eigentlich keine Null dann in der Zelle stehen, sondern der Wert, den ich eingegeben habe.
Könnt ihr mir sagen, wie ich das richtig stellen muss?
Private Sub CommandButton1_Click()
Dim Loletzte As Long
Loletzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count)
Cells(Loletzte + 0, 2) = CDbl(Texbox2)
Me.Hide
End Sub
Gruß Jonatan