Bonjour , une nouvelle fois je vous écris

Pour commencer j'ai un fichier avec 2 colonnes que je dois remplir , a l'aide d'un autre fichier.Mais pour savoir laquelle des 2 remplir je dois me réferencer a un 3éme fichier

Pour cela j'ai essayé ceci

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
19
20
21
22
23
24
Sub essai()
 
  Dim Lig     As Long
  Dim Col     As String
  Dim NbrLig  As Long
  Dim NumLig  As Long
 
  Sheets("Feuil2").Activate ' feuille de destination
 
  Col = "C"                 ' colonne de la donnée non vide à tester
  NumLig = 0
  With Sheets("Feuil1")     ' feuille source
  NbrLig = .Cells(65536, Col).End(xlUp).Row
  For Lig = 1 To NbrLig
    If .Cells(Lig, Col).Value <> "" Then
      .Cells(Lig, Col).EntireRow.Copy
      NumLig = NumLig + 1
      Cells(NumLig, 1).Select
      ActiveSheet.Paste
    End If
  Next
  End With
 
End Sub
mais cela me met une erreur 1004 et je ne sais pas comment il faut que je fasse pour qu'il sache quelle cellule remplir.

En vous remerciant de l'aide que vous pourrez m'apporter.