Macro extraction de lignes avec un critère de date mais sans doublon de nom

[jlbox]

Bonsoir à tous,

J'ai besoin d'un coup main pour une extraction.

Je voudrais une macro pour extraire des lignes avec un critère de date et sans doublon de nom. Je vous joint un fichier exemple qui décrit mieux ma demande.

Merci pour votre aide.

 

[jlbox]

Re : Macro extraction de lignes avec un critère de date mais sans doublon de nom

Bonjour à tous,

Je reste bloquer sur ce problème 😕. Peut-être le sujet a déjà fait l'objet d'une discussion mais je ne l'ai pas encore trouvé. Si quelqu'un a une solution... je suis preneur. Quoiqu'il en soit merci à vous tous.

 

[Bebere]

Re : Macro extraction de lignes avec un critère de date mais sans doublon de nom

bonjour Jlbox
une 1ère réponse
donnant résultats attendus
à bientôt

 

[Robert]

Re : Macro extraction de lignes avec un critère de date mais sans doublon de nom

Bonsoir JlBox, Bebere, bonsoir le forum,

Perso, je préfère la méthode à Bebere plus concise et plus rapide mais puisque j'y ai travaillé aussi dessus je t'envoie quand même ma proposition :

 

[jlbox]

Re : Macro extraction de lignes avec un critère de date mais sans doublon de nom

Bonjour à Bebere, Robert et le forum,

Tout d'abord, merci à vous deux pour votre réponse sur ce sujet et le temps que vous y avez consacré.

Le fichier de Robert fonctionne parfaitement.

Celui de Bebere me sort une erreur de compilation.

Argument nommé introuvable

DataOption1 _
:=xlSortTextAsNumbers

Mes connaissances VBA sont trop limités pour comprendre l'erreur en question.

 

[jeanpierre]

Re : Macro extraction de lignes avec un critère de date mais sans doublon de nom

Bonjour jlbox Bebere, Robert,

C'est parce que tu dois avoir Excel 2000 et cette option n'existe pas sous cette version.

Il te suffit de le commenter (en rouge) juste avant la virgule et c'est bon :

Range("A3:C" & Range("A2000").End(xlUp).Row).Sort Key1:=Range("A4"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=5, MatchCase:=True, Orientation:=xlTopToBottom ', DataOption1 _
:=xlSortTextAsNumbers

Attention tu en as deux dans le code alors pareil pour le second.

Bonne journée.

Jean-Pierre

 

[Bebere]

Re : Macro extraction de lignes avec un critère de date mais sans doublon de nom

bonjour Jlbox,Robert,JeanPierre
au cas ou Jllbox n'aurait pas compris JeanPierre
à bientôt

 

[jlbox]

Re : Macro extraction de lignes avec un critère de date mais sans doublon de nom

Bonjour au forum,

Merci pour l'excellent coup de main sur le sujet.