Macro pour copie de donnée

[Frank]

Boujour à tous,
J'aurais besoin de votre aide car, je désire faire une macro pour copier, dans une autre feuille, le texte d'une cellule dans la colonne A si vis à vis dans la colonne C il y a une valeur d'inscrite.

Si ce n'est pas assé claire n'ésiter pas

Merci de votre aide

 

[JCGL]

Re : Macro pour copie de donnée

Bonjour à tous,
Bienvenue sur XLD,

Il est d'usage, sur XLD, de déposer un bout de fichier pour permettre une réponse adaptée...

Peux-tu essayer :

Option Explicit


Sub Copie()
Dim X%
For X = 2 To Feuil1.Range("A65536").End(xlUp).Row
If Feuil1.Range("C" & X) <> "" Then Feuil1.Range("A" & X).Copy Feuil2.Range("A" & Range("A65536").End(xlUp).Row + 1)
Next X
End Sub

A + à tous