Hallo !
Wenn ich das eintrage dann kommt ein...........Syntaxfehler .....was auch immer das ist

Hier der Code:

Private Sub CommandButton3_Click()
Dim StartZeile&
Dim Ws As Worksheet
Set Ws = ActiveSheet
StartZeile = Ws.Cells(3, 1).End(xlUp).Row + 5

Wenn ich das hier eintrage, da kommt dann: Fehler beim Komilieren: Syntaxfehler
TextBox1 = Int(Ws.Cells(StartZeile, 3)/1000), "0 ,"""))

UserForm1.TextBox1.SetFocus

Ws.Cells(StartZeile + 1, 3) = TextBox3
End Sub