Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Advanced filter (et accessoirement sélection de plage)

erictran

XLDnaute Nouveau
Bonsoir le forum

Avec votre aide j'ai pu adapter une macro de comparaison de table de données, et maintenant je peaufine : je voudrais utiliser advancedfilter pour utiliser des critères prédéfinis qui sont dans des tables de la feuille "filtre"

Mais je coince sur la compréhension de "advancedfilter" (et aussi une erreur sur la definition de la plage à filtrer qui est variable)

Je m'explique : pour les criteria , on définit la plage contenant les critères de filtres - dans mon cas feuille filtre "A3:A5" , mais comment définit t'on sur quelle colonne de la table de données il faut appliquer ce filtre ? Là à ce stade, je n'arrive pas à filtrer correctement la table de données sur les critères définis en "A3:A5"

D'avance merci pour vos lumières !

Eric

VB:
Sub FiltreSTHD()
Dim derlig

With Sheets("Comparaison")
.derlig = .Range("B" & Rows.Count).End(xlUp).Row
.Range("B3:AH3" & dlig).AdvancedFilter xlFilterInPlace, Worksheets("Filtres").Range("A3:A5"), False

End With

End Sub
 

Pièces jointes

  • comparaison requête anonymisé V2.xlsm
    30.9 KB · Affichages: 12

Phil69970

XLDnaute Barbatruc
Bonjour erictran

Beaucoup d'erreur dans ta sub
Ceci fonctionnera mieux.
VB:
Sub FiltreSTHD()
Dim Derlig As long

With Sheets("Comparaison")
    Derlig = .Range("B" & Rows.Count).End(xlUp).Row
    .Range("B3:AH" & Derlig).AdvancedFilter xlFilterInPlace, Worksheets("Filtres").Range("A3:A5"), False
End With

End Sub


@Phil69970
 
Dernière édition:

Discussions similaires

Réponses
12
Affichages
853
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…