Textbox copier colonne

Bonjour a tous je voudrai copier les 10 premières texbox dans la colonne A a la suite mais je ne comprend pas mon erreur .

si quelqu'un peut m'aider

Private Sub CommandButton1_Click()

Dim L As Integer

 If MsgBox("Confirmez-vous l'insertion de ce nouveau contact ?", vbYesNo, "Demande de confirmation d'ajout") = vbYes Then
     L = Sheets("losfeld").Range("a65536").End(xlUp).Row + 1 '

     Range("A" & L).Value = TextBox1
     Range("A" & L).Value = TextBox2
     Range("A" & L).Value = TextBox3
     Range("A" & L).Value = TextBox4
     Range("A" & L).Value = TextBox5
     Range("A" & L).Value = TextBox6
     Range("A" & L).Value = TextBox7
     Range("A" & L).Value = TextBox8
     Range("A" & L).Value = TextBox9
     Range("A" & L).Value = TextBox10
     Range("B" & L).Value = TextBox11
 End If
unload losfeld
End Sub

Hello,

L = Sheets("losfeld").Range("a65536").End(xlUp).Row + 1 '

     Range("A" & L).Value = TextBox1.text
     Range("A" & L+1).Value = TextBox2.text
     Range("A" & L+2).Value = TextBox3.text
'Ainsi de suite ...

salut , merci de ton aide

cordialement