Copier toutes les lignes contenant le matricule recherché dans une autre feuille

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 .

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.

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

re

Citation:

---

Envoyé par marzak_30

je prefere avoir un macro pour utiliser une bouton d execution

---

Eh bien la voici :

Code:

---

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.

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

merci infiniment j ai pu me debrouillé 🙂