Microsoft 365 filtre : masquer les indicateurs de filtre sans perdre le filtrage

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous :)

Tien, tien, revoilou "l'usine à gaz" lol ;)
Je reviens pour le casse-neurones du WE lol ...
C'est mapomme et patricktoulon qui vont être contents lol

Comme l'indique le titre du fil : je souhaiterais pouvoir masquer les indicateurs de filtre sans perdre le filtrage.
1647013510733.png

J'ai beaucoup cherché sans trouver de solution ... enfin si, il y en a une : il suffit de mettre à hauteur 0 la 1ère ligne de filtrage.

Mon souci est que dans dans mon fichier de travail "autrement dit : ma zizine à gaz", il n'y a pas de ligne ligne que je pourrai mettre à hauteur 0.
(j'l'avais pas prévu s'coup-là Grrrr !!! :mad::mad::mad: purée de moi) ... Et insérer une ligne vide m'obligerait à recoder beaucoup mon fichier.

Auriez-vous une solution ? Ce serait super !

Un grand merci par avance, je joins un fichier test et je continue mes recherches.
Amicalement,
lionel :)
 

Pièces jointes

  • 01 Filtre_JBB.xlsm
    43.2 KB · Affichages: 9
Solution
Re, Bonsoir Marcel, Staple,
Je persévère, je n'ai jamais eu cette idée. Formation continue :)
Peut être en utilisant la propriété Visibledropdown:=False
VB:
Sub FiltreData()
On Error Resume Next
    Application.ScreenUpdating = False
    T = Array(3, 4, 5, 6, 7, 9)
    With Sheets("choix").Range("A5:J10000")
        .AutoFilter Field:=1, Criteria1:="m", Visibledropdown:=False
        .AutoFilter Field:=2, Criteria1:="ca", Visibledropdown:=False
        .AutoFilter Field:=8, Criteria1:="3118", Visibledropdown:=False
        .AutoFilter Field:=10, Criteria1:="el", Visibledropdown:=False
        For i = 0 To UBound(T)
            .AutoFilter Field:=T(i), Criteria1:="*", Visibledropdown:=False
        Next i
    End With
    [a1].Select
End...

Staple1600

XLDnaute Barbatruc
Re

Change alors de lunettes...)
Tu n'as pas vu sur l'image: =A6="M"
(qui est donc la formule qu'insére la macro du message#47 que tu n'as pas testé, toi qui disais tester toutes les propositions qu'on te propose ;)
Tu devrais préciser que tu les testes uniquement si on te fournit un fichier Excel.
Comme je ne le fais pas, il faut vraiment que je te travailles au corps pour que tu les testes ;)
 

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Re

Change alors de lunettes...)
Tu n'as pas vu sur l'image: =A6="M"
(qui est donc la formule qu'insére la macro du message#47 que tu n'as pas testé, toi qui disais tester toutes les propositions qu'on te propose ;)
Tu devrais préciser que tu les testes uniquement si on te fournit un fichier Excel.
Comme je ne le fais pas, il faut vraiment que je te travailles au corps pour que tu les testes ;)
Cher JM : il y a des limites à ne pas dépasser !
Si je dis que je teste tout = "JE TESTE TOUT" et prétendre le contraire est me traiter de menteur :mad:
Comment je peux te dire que je n'ai pas vu l'image: =A6="M" et mes lunettes vont très bien lol
Reprends les dernières réponses de Marcel qui n'a pas vu également !
 

Staple1600

XLDnaute Barbatruc
Re

Usine à gaz
Si tu testes tout alors, tu as testé le code du message#42
Enrichi (BBcode):
Sub Filtre_Avancé()
Dim vCriteres
vCriteres = Array("=RC[-11]=""M""", "=RC[-11]=""Ca""", "=RC[-6]=3118", "=RC[-5]=""El""")
Range("L6:O6").Value = vCriteres: Range("A5") = "ITEM1"
Range("L6:O6").Font.Color = vbWhite: Range("A5").Font.Color = vbWhite
Range("A5").AutoFill Destination:=Range("A5:J5"), Type:=xlFillDefault
Range("A5:J31").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range("L5:O6")
End Sub
Et se faisant, tu aurais pu voir dans la barre de formule ce qu'il y en L6.

NB: je ne traite pas de menteur puisque je ne l'ai pas écrit ;)
Et tu n'es pas nul en VBA, tu persistes juste à ne pas progresser en VBA.
(Tu n'es plus un débutant, vu le nombre de posts que tu as compteur)


PS1: je ne fais pas de jeu de piste, simplement je ne poste pas de fichier Excel.
je poste formule+VBA+copie écran etc...dans l'espoir que le demandeur s'investisse dans la résolution de sa question.
Et des questions surgissent sur mes propositions, j'apporte des compléments d'informations.

PS2: Quel temps perdu ? Puisque tu as mis ta question en résolu depuis belle lurette ;)
Quant au mien de temps, bah il y a que moi qui voit défiler les secondes sur mon horloge
 
Dernière édition:

Staple1600

XLDnaute Barbatruc
Re

=>Marcel32
Précisions
Pour faire ma copie d'écran, pour montrer les formules, j'ai cliqué sur Afficher les formules
Ce qui a eu pour conséquence d'élargir les colonnes.
Ainsi pour ne pas avoir une image trop grande sur XLD, j'ai réduit ce que j'ai pu
afin d'avoir une image assez réduite.
En aucun cas, il s'agissait d'un jeu de piste.
Et n'ayant de retour sur ce petit "tuto"
J'ai donc proposé dans le message#42
Le code VBA correspondant à ce qu'illustrait le message#35
(qui précise bien qu'il s'agit de la manip manuelle avec Filtre avancé)
Et dans ce message#42, j'ai donc ajouter des explications plus détaillées
(notamment que j'ajoutais des entêtes que je mettais ces entêtes et la zone de critères en blanc - simplement par souci esthétique et parce que je sais puisque Lionel n'avait d'entêtes dans son tableau qu'il n'aurait pas voulu voir apparaitre les entêtes et les formules de critères.

Si je relis tout le fil, ces deux messages #35 et #42 n'ont pas intéressés grand monde ;)
( A part sylvanu que je remercie au passage)
@lionel, le filtre avancé de Staple semble séduisant, non ?
 
Dernière édition:

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Re

=>Marcel32
Précisions
Pour faire ma copie d'écran, pour montrer les formules, j'ai cliqué sur Afficher les formules
Ce qui a eu pour conséquence d'élargir les colonnes.
Ainsi pour ne pas avoir une image trop grande sur XLD, j'ai réduit ce que j'ai pu
afin d'avoir une image assez réduite.
En aucun cas, il s'agissait d'un jeu de piste.
Et n'ayant de retour sur ce petit "tuto"
J'ai donc proposé dans le message#42
Le code VBA correspondant à ce qu'illustrait le message#35
(qui précise bien qu'il s'agit de la manip manuelle avec Filtre avancé)
Et dans ce message#42, j'ai donc ajouter des explications plus détaillées
(notamment que j'ajoutais des entêtes que je mettais ces entêtes et la zone de critères en blanc - simplement par souci esthétique et parce que je sais puisque Lionel n'avait d'entêtes dans son tableau qu'il n'aurait pas voulu voir apparaitre les entêtes et les formules de critères.

Si je relis tout le fil, ces deux messages #35 et #42 n'ont pas intéressés grand monde ;)
( part sylvanu que je remercie au passage)
Je sais que tu as fait au mieux JM ... je le sais ... contrairement à ce que tu crois, je suis "plus formable".
Ce que j'arrive à faire :
Prendre les codes que vous tous avez la gentillesse de m'envoyer et de les adapter en tâtonnant, ce qui me permet de comprendre "un peu" comment ça fonctionne ...
C'est tout ce que j'arrive à faire... Mais suivre des jeux de pistes, je n'ai ni le temps, ni je sais faire :)
 
Dernière édition:

TooFatBoy

XLDnaute Barbatruc
Ainsi pour ne pas avoir une image trop grande sur XLD, j'ai réduit ce que j'ai pu
afin d'avoir une image assez réduite.
En aucun cas, il s'agissait d'un jeu de piste.
OK.

Perso j'aurais plutôt masqué des lignes et des colonnes pour ne garder visible que ce qui était intéressant.
Mais chacun fait comme il veut ; ou comme il peut car ce n'était peut-être pas faisable avec ton fichier. ;)
 
Dernière édition:

Staple1600

XLDnaute Barbatruc
Re

Usine à gaz
Comme je l'ai dit, il ne s'agissait pas d'un jeu de piste.
Mais la prochaine fois, je n'oublierais pas de mettre plus d'infos dans mes copies d'écran.
Et le code VBA et la copie d'écran dans le même message.
Et normalement, le code VBA sera prêt à l'emploi pour test
Tu n'auras plus qu'à mouiller le maillot pour faire des adaptations et poser des questions complémentaires sur mes propositions.
(Ce qui ne fut pas le cas ici)
C'est sympa de remercier ou de me liker
Mais tu peux poser aussi des questions sur ma syntaxe VBA, j'y répondrai.
 

TooFatBoy

XLDnaute Barbatruc
Si je relis tout le fil, ces deux messages #35 et #42 n'ont pas intéressés grand monde ;)
Oui, probablement à cause de ce que j'appelle "le jeu de pistes".

Rien que la capture d'écran en elle-même est un jeu de piste :
Une partie 1 en haut (ça, ça paraît normal), une partie 2 à droite (ça, c'est déjà moins normal), au milieu un gloubiboulga de trucs sans délimitations, une partie 3 un peu plus bas, et encore plus bas une quatrième partie (un petit clin d'oeil hors explications).

Mais comme y en des qui disent : ceci est mon opinion personnelle à moi que je partage avec moi-même et qui n'engage que moi. ;)
 

Discussions similaires

Statistiques des forums

Discussions
312 185
Messages
2 086 011
Membres
103 093
dernier inscrit
Molinari