Salut,
Une chose m'intrigue, tu vas chercher DL au fin fond de la feuille 8 et tu t'en sert sur la feuille 2...
Si tu utilises les TS va jusqu'au bout, affecte une variable ListRow et sert t'en.
Je te conseille aussi de nommer tes feuilles ou d'affecter un objet. Sheets(2) peut très bien évoluer dans le temps et donner des résultats inattendus. Idem pour ListObject(1)
Donc On ajoute une ligne au tableau et on s'en sert.
Private Sub CommandButton1_Click()
Dim lstRow As ListRow
'...
'...
Set lstRow = Sheets(2).ListObject(1).ListRows.Add
With lstRow
.Range(2).Value = Me.Label_info.Caption
.Range(3).Value = Me.txt_Nom
'...
'...
End With
End Sub