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

VBA - Filtre avancé : résultat curieux

  • Initiateur de la discussion Initiateur de la discussion DoubleZero
  • Date de début Date de début

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 !

DoubleZero

XLDnaute Barbatruc
Bonjour à toutes et à tous,

Dans cette discussion, le demandeur souhaitait la création d'onglets, suivie d'une extraction, en fonction de la ville mentionnée en colonne H.

Le filtre avancé ne donne pas le résultat attendu dès lors que des villes comme "Paris 1", "Paris 11", "Paris 15" figurent dans ladite colonne.

Afin de remédier à cet inconvénient, il m'a fallu filtrer à la fois sur la ville et le code postal.

Cela est peut-être normal 😕... mais je n'en comprends pas la raison.

Je vous remercie pour votre aide.

A bientôt 🙂
 

Pièces jointes

Re : VBA - Filtre avancé : résultat curieux

Bonjour à tous
Bise à 00 😉

Oui c'est un comportement habituel. Pour une correspondance exacte il faux passer par une formule :

  • soit garder le titre initial et mettre ="=Paris 1"
  • soit mettre une autre en-tête (ville2 par exemple et non ville ) et en dessous =Ville="Paris 1"

S'il n'y a qu'une ville tu peux faire la transformation dans le code VBA, sinon prévoir une zone bis qui par formule transformera la zone remplie de façon simple par l'utilisateur avec un titre Ville2 et pour chaque ligne =Ville=$A$2 à adapter...
 
Re : VBA - Filtre avancé : résultat curieux

Bonjour chère ânesse 🙂

Il n'y a pas de feuille "extract" mais une feuille "Base"...

Ceci fonctionne très bien :

Code:
Sub Paris1_FAUX()
    Sheets("Base").Range("A10:I20").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Range("A1:A2"), CopyToRange:=Range("D1:L1"), Unique:=False
End Sub
Mais à condition d'utiliser correctement la zone de critère :

- laisser A1 vide

- entrer en A2 la formule =Base!H11="Paris 1"

Edit : hello chris, pas rafraîchi 🙂

A+
 
Dernière édition:
Re : VBA - Filtre avancé : résultat curieux

Bonjour, chris 😀, job75 😀, le Forum,

... Il n'y a pas de feuille "extract" mais une feuille "Base"...

Oui, pardon 😱, job75, j'ai modifié le titre original de l'onglet...

Un gros MERCI pour toi itou 😀

@ chris 😀,

Oui c'est un comportement habituel.

Je ne l'avais encore jamais 😕 rencontré. Il me faudra, désormais, faire preuve d'une grande prudence 😡

A bientôt 🙂🙂
 
- 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
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…