Hello tout le monde !
Petite question sur une ligne de mon code qui me pose problème et m'afficher l'erreur 1004
For Each Cell In Range("Clé_Collab_Existant")
If Cell = 0 Then
Sheets("Transcodage_Collab").Range("B2").End(xlDown).Offset(1, 0).Value = Sheets("Collab Suivi Activité").Range("A1").Offset(Cell.Row - 1, -5)
End If
Next Cell
Je n'arrive pas à comprendre d'où vient l'erreur, toutes les cellules sont bien définies, les noms d'onglets sont les bons, ...
J'ai essayé de modifier la ligne de code en erreur de la manière suivante pour voir si ce n'était pas un incompatibilité de type mais cela n'a pas fonctionné :
Sheets("Transcodage_Collab").Range("B2").End(xlDown).Offset(1, 0).Value = Sheets("Collab Suivi Activité").Range("A1").Offset(Cell.Row - 1, -5).Value
D'avance, merci de votre aide sur ce problème bloquant