Discussion :

[marzak_30]

salut :
je suis debutant en Vba excel et j ai un classeur excel dans la feuille "SOURCE" j ai une liste des client identifié par un matricule dans la colone 4, sachant qu il se peut q un client sera enregistré plusieurs fois dans des lignes differents ,donc je veux un macro qui cherche un client avec son matricule et copie tous les lignes qui contient le meme client dans une autre feuille "FINAL" et merci d avance je vous informe que ma feuille "SOURCE" se compose de 4000 lignes .

[anasecu]

Bonsoir,

Cela correspond à un filtre élaboré ( Mode d'emploi )et si tu veux une macro il te suffit de l'enregistrer en créant ton filtre.
Ensuite il suffira de lancer la ligne de procédure.

[marzak_30]

merci Mr anasecu mais je prefere avoir un macro pour utiliser une bouton d execution merci encore une fois

[anasecu]

re

je prefere avoir un macro pour utiliser une bouton d execution

Eh bien la voici :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub choix()
    Sheets("SOURCE").Range("A1:Z8000").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Range("AA1:AA2"), CopyToRange:=Sheets("FINAL").Range("A1:Z1"), Unique:=False
End Sub

Le matricule est à saisir en AA2 de "FINAL" : à toi d'adapter avec ton classeur.

[marzak_30]

merci encore une fois Mr anasecu mais j ai un probleme de compile error :
expected:list separator or) tout en colorant "FINAL" en bleu je sais pas d ou vient l erreur meme si ton code et ecris a la rigueur

[marzak_30]

merci infiniment j ai pu me debrouillé 🙂