XL 2013 Extraction

[candido57]

Bonjour,
J'ai récupéré un fichier avec une macro extraction, j'ai modifier par rapport à ceux que je voulais, ça fonctionne, mais je n'arrive pas à extraire lorsque je mets une seul condition feuille "Extraction" cellule F2.
Merci pour votre aide.

 

[Staple1600]

Re

J'ai bien pour cela que j'avais précisé

Mais tu vas vite voir le problème

 

[Staple1600]

Re

On peut aussi utiliser un critère formulé, avec cette formule (*)
=ET(Base!G3=Extraction!B2;Base!C3=Extraction!F2;Base!H3=Extraction!H2)
ou celle-ci
=OU(Base!G3=Extraction!B2;Base!C3=Extraction!F2;Base!H3=Extraction!H2)

Mais le problème reste plus au moins le même.
Car les critères du filtre s'excluent mutuellement
Exemple
Si tu choisis N°19, tu ne pourras jamais choisir 12 / S22

Personnellement, plus j'y pense, et pour un confort d'utilisation, plus j'oublierai le VBA
Pour opter pour les filtres (pilotés manuellement) ou mieux utiliser un TCD
Exemple de TCD

Tout se pilote à la souris et pas besoin de maitriser le langage VBA
De plus, on n'altère pas la base de données.

(*) Pour tester le critère formulé, c'est cette version de la macro

Spoiler: version 4

Sub Extraction_Staple_QUATRO()
Dim CRITERES As Range, RECOPIE As Range
'ici on définit la plage des critères du filtre
Set CRITERES = Sheets("Extraction").Range("L6:L7")
'ici on définit où la recopie du filtre se fera
Set RECOPIE = Sheets("Extraction").Range("A6:J6")
'ici on applique le filtre avancé
Sheets("Base").Range("A2:J40").AdvancedFilter _
    Action:=xlFilterCopy, _
    CriteriaRange:=CRITERES, _
    CopyToRange:=RECOPIE, Unique:=False
End Sub

 

[candido57]

Bonjour,

Je te remercie pour ton aide

 

[Staple1600]

Bonjour @candido57

Merci pour le merci

Mais que penses-tu de l'emploi d'un TCD ?

Ce n'est pas plus simple ?

 

[Staple1600]

Re

@candido57
TCD= Tableau Croisé Dynamique
Voir ici par exemple

Créer un tableau croisé dynamique pour analyser des données de feuille de calcul - Support Microsoft

Comment utiliser un tableau croisé dynamique dans Excel pour calculer, synthétiser, et analyser vos données de feuille de calcul pour voir les tendances et modèles masqués.

support.microsoft.com

ou à la maison

Tableaux croisés dynamiques d'Excel

Recouper et synthétiser les données répétitives avec les tableaux croisés dynamiques pour fournir des résultats consolidés et synthétisés, faciles à exploiter. Nous recoupons tout d'abord les données d'un tableau dense, recensant des idées de...

excel-downloads.com