Envoyer des données vers un tcd

Bonjour a tous !

je suis débutante sur vba et aurai besoin d'un peu d'aide (avec des explications si possible). Je dois envoyer des informations d'un formulaires vers une nouvelle ligne sur un TCD d'une autre feuille. Je pensais utiliser une boucle mais suis complètement perdue sur son exécution et me retrouve bloquée :'((

Est-ce que vous pourriez m'apporter des éclaircissement ?

Mon prof nous a suggéré d'utilisé range.offset mais je ne comprends pas comment l'appliquer sur une autre feuille ?

Bonsoir,

Il vous faut apprendre à travailler avec des tableaux structurés (et non TCD).

Sub VersArchives()

Dim TabArchives As ListObject
Dim LigneArchive As ListRow
Dim ShForm As Worksheet

    Set ShForm = Sheets("Formulaire")
    Set TabArchives = Sheets("Archives").ListObjects("Tableau1")
    Set LigneArchive = TabArchives.ListRows.Add

    With LigneArchive

         .Range(1, 1) = ShForm.Range("C6")
         .Range(1, 2) = ShForm.Range("I6")
         .Range(1, 3) = ShForm.Range("E6")
         .Range(1, 4) = ShForm.Range("C9")
         .Range(1, 5) = ShForm.Range("G9")
         .Range(1, 6) = ShForm.Range("C12")
         .Range(1, 7) = ShForm.Range("C15")
         .Range(1, 8) = ShForm.Range("E15")
         .Range(1, 9) = ShForm.Range("G15")
         .Range(1, 10) = ShForm.Range("I15")

     End With

     Set LigneArchive = Nothing
     Set TabArchives = Nothing
     Set ShForm = Nothing

End Sub
    

Merci beaucoup pour les éclaircissements !!