Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
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.
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
Code:
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
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.
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...
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD