Bonjour tout le monde

Voila ci-dessous j'ai une macro qui fonctionne très bien au seul inconvénient c'est que celle là insert les données à partir de la cellule A2 or moi je veux que le départ soit de A12

Voici la macro :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub CommandButton1_Click()
Dim LigneDebut As Long
Dim Ctrl As Control
Dim r As Integer
Dim t As Integer
Dim Derligne As Integer
 
With Worksheets("feuil1")
LigneDebut = 10
Derligne = .Range("A10000").End(xlUp).Row + 1
For Each Ctrl In UserForm1.Controls
r = Val(Ctrl.Tag)
If r > 0 Then Feuil1.Cells(Derligne, r) = Ctrl
Next
End With
TextBox1 = ""
Unload Me
End Sub
Que faudrait-il modifié pour avoir le résultat voulu

Merci à vous tous

Cordialement