Liaison automatique entre un formulaire et une feuille en VBA

Bonjour

je souhaite faire une liaison automatique entre les colonnes d' une feuille ( FORMS / formulaire qui se rempli quotidiennement ) et une autre feuille dans le meme classeur .

Le probleme est que si je fais une copie avec ce script les donnees ne se mette pas a jour automatiquement a chaque fois que le formulaire est rempli

Set Sh = Sheets("Feuil1")
With Sheets("Form1")
For Each C In Intersect(.Range("p:p"), .UsedRange)
If C <> "" Then
C.Copy Sh.Cells(C.Row, 8)
End If
Next C
End With