Zahlen in Textbox
10.11.2003 09:21:36
Michael
Ich habe mir eine Postliste angelegt. Die auch ´problemlos funktioniert. Das Problem ist nur, daß der Betrag als Text ins Tabellenblatt (PostlisteGesamt) geschrieben wird. Ich brauche den Betrag aber als Zahl im Tabellenblatt. Ich weiß wirklich nicht mehr weiter.
Private Sub CommandButton1_Click()
Worksheets("PostlisteGesamt").Activate
z = 1
Do While Cells(z, 1) <> ""
z = z + 1
Loop
Cells(z, 1) = Me.Vorname
Cells(z, 2) = Me.Familienname
Cells(z, 3) = Me.PLZ
Cells(z, 4) = Me.Strasse
Cells(z, 5) = Me.Betrag
End Sub
Anzeige