Discussion :

[Angry_Capitalist]

Bonjour à tous

Je cherche un moyen d'effectuer plusieurs filtres sur des colonnes d'un fichier à l'aide d'une macro excel
Je voudrais notamment pouvoir effectuer un filtre sur une colonne, laisser à l'utilisateur la possibilité de voir
les résultats et lui laisser la possibilité d'ajouter un second, troisième... filtres etc
Du coup je voudrais que mes combobox non utilisées par le premier filtre change et ne mette que les valeurs disponible suite au filtre
je vous donne un exemple pour faire simple
on a les colonnes

NOM VILLE
Martin Montpellier
Martin Paris
José Lille

On effectue un filtre sur les nom en cherchant toutes les personnes s'appelant Martin grâce a la ComboBox qui permet de
filtrer les noms on se retrouve avec

NOM VILLE
Martin Montpellier
Martin Paris

Le soucis c'est que à ce moment ma 2ème ComboBox pour filtrer les villes proposeras Montpellier, Paris ET Lille
alors que Lille ne fait plus partis des villes disponibles

Voila le code que j'utilise pour initialiser/update mes ComboBox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
ComboBoxPart_No.ColumnCount = 1
 Set f = Sheets("EXTRACT_CR")
  Set MonDico = CreateObject("Scripting.Dictionary")
  a = f.Range("A2:A" & f.[A65000].End(xlUp).Row)
  For I = LBound(a) To UBound(a)
    If a(I, 1) <> "" Then MonDico(a(I, 1)) = ""
  Next I
  ComboBoxPart_No.List = MonDico.keys

Note : Si je fais comme ça c'est pour pas avoir les doublons de mes colonnes

Je pensais juste changer la 4ème ligne et rajouter ".SpecialCells(xlVisible)" mais ça ne fonctionne que pour les villes du début
CAD : j'applique mon filtre sur mon tableaux de 5 lignes ça me retire la ligne 3. Si j'update ma ComboBox après le filtre
en utilisant SpecialsCells(xlVisible) je vais récupérer que les résultat des lignes 1 et 2 mais pas les lignes 4 et 5 pour des raisons qui m'échappe

Voila désolé pour le paragraphe de 50 lignes mais c'est tellement spécifique que j'ai considéré qu'il fallait que je raconte tout
Merci a ceux qui prennent le temps de lire/répondre
Gardez le feux brûlant dans votre cœur

[Invité]

Bonjour,

Le fichier joint n'utilise pas du tout la méthode que vous utilisez. Mais, regardez la colonne Recherche qui concatène les colonnes à filtrer séparées par des caractères blancs et le champ Recherche du Userform.
Vous allez filtrer la liste en tapant quelques lettres composant les différents mots de la colonne Recherche, séparées par des caractères blancs.

[Angry_Capitalist]

Pardon d'avoir un peu abandonné le post comme je travaille que 2 jour par semaine j'oublie un peu de revenir voir sur le site si mon post a évolué
Mais de toute manière il semble que tout ce que je voulais faire sur ma macro ne sera pas faisable
Je voulais aussi rajouter un tri alphanumérique que j'ai abandonné, faire ça en VBA sur mon fichier excel faisant 30000 ligne environ faisait que la macro se lancait en 15 min au lieu de se faire instantanément.
On à décider avec mon chef de projet de partir sur du SSRS (ou SSIS je sais plus) pour retourner directement à l'utilisateur la ligne dont il a besoin du coup je clos le sujet et je vais quand même regarder ton ficher Eric car cela pourra me servir pour des fichiers excel plus petit donc un grand merci a toi

bise à tous

[Invité]

Bonjour,

Même avec 30 000 enregistrements, la réponse est ultra rapide.

[jeanmidudu]

Pour un fichier avec 15 colonnes de 100 000 lignes (soit 1 500 000 enregistrements), la macro met 40 secondes...
Il y a probablement de gros problèmes dans les traitements pour mettre 15 minutes avec 30 000 enregistrements

[boisgontierjacques]

Bonjour,

Ce programme est paramétré:
-Fltre multi-combobox. Les choix dans les comboboxs se font dans un ordre quelconque.
-Filtre par recherche intuitive multi-mots multi-colonnes.

Boisgontier