Masquer ligne automatiquement même en présence de filtre

chris

XLDnaute Barbatruc

• 25 Février 2016

• #2

Re : Masquer ligne automatiquement même en présence de filtre

Bonjour

Ajouter une colonne qui repère les lignes "mères".

Sachant que le filtrage défiltrage n'est pas un évènement Excel, il faut ensuite trouver une solution pour détecter le défiltrage.
Une fonction perso volatile calculant l'écart entre le nombre de lignes et le nombres de lignes visibles sur la base de cette colonne, pourrait sans doute déclencher l'événement Caculate te permettant de remasquer ces lignes...

 

Vote positif 0 Vote négatif

T

thebenoit59

XLDnaute Accro

• 25 Février 2016

• #3

Re : Masquer ligne automatiquement même en présence de filtre

Bonjour Nanou, bonjour Chris.
Je te propose déjà de simplifier ton code pour masquer les lignes mères :

Sub MASQUER()
Dim DerLig As Long

' Déterminer la dernière ligne remplie en B
DerLig = Cells(Rows.Count, 2).End(xlUp).Row

' On analyse toutes les lignes depuis la dernière à la ligne statut + 1
For lignes = DerLig To 6 Step -1
If Rows(lignes).Find("*", LookIn:=xlValues) Is Nothing Then Rows(lignes).Hidden = True
Next lignes

End Sub

Cliquez pour agrandir...

Pour la suite, il faut suivre les instructions de Chris

 

Vote positif 0 Vote négatif

N

nanou0186

XLDnaute Nouveau

• 25 Février 2016

• #4

Re : Masquer ligne automatiquement même en présence de filtre

Merci à vous.
Chris, je sèche complètement (je suis très novice). j'ai essayé de faire un évènement calculate mais il y avait que des erreurs.
Aurais tu une proposition par apport au fichier que j'ai envoyé ?

Thebenoit59. merci beaucoup. je vais le changer

 

Vote positif 0 Vote négatif

N

nanou0186

XLDnaute Nouveau

• 25 Février 2016

• #5

Re : Masquer ligne automatiquement même en présence de filtre

Thebenoit59 : je viens de tester. si je crééé 1 ligne et que je fais masquer les formules, il me masque ma ligne mère et ma ligne fille que je viens de créér. est ce pmossible que ça me masque uniquement la ligne 6 ?

 

Vote positif 0 Vote négatif

T

thebenoit59

XLDnaute Accro

• 25 Février 2016

• #6

Re : Masquer ligne automatiquement même en présence de filtre

Nanou, j'ai estimé que la ligne mère ne comportait aucune valeur et une ligne fille en avait une.
Ca doit être pour ça.

 

Vote positif 0 Vote négatif

N

nanou0186

XLDnaute Nouveau

• 26 Février 2016

• #7

Re : Masquer ligne automatiquement même en présence de filtre

Bonjour
Je me permets de relancer.
Avez vous des propositions pour masquer une ligne "mère" et faire en sorte qu'elle reste masquer même lorsqu'on retire les filtres?
Je vous remercie par avance
Encore merci pour votre aide

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 26 Février 2016

• #8

Re : Masquer ligne automatiquement même en présence de filtre

Bonjour

J'ai tenté pour constater que finalement le calcul

Code:

SpecialCells(xlCellTypeVisible).Cells.Count

est bugué dans Excel.
Après avoir ajouté une colonne Mère dans le tableau avec des X ou * sur les lignes concernées, il suffit de placer une formule

Code:

=SOUS.TOTAL(3;CCRollingTable[Mère])

par exemple en S1 puis dans le module de la feuille

Code:

Private Sub Worksheet_Calculate()
    If [S1] > 0 Then
        ListObjects("CCRollingTable").Range.AutoFilter Field:=1, Criteria1:="="
    End If
End Sub

Edit : fichier ajouté

 

Pièces jointes

• draft2.xlsm

  30.7 KB · Affichages: 36

Dernière édition: 26 Février 2016

Vote positif 0 Vote négatif

N

nanou0186

XLDnaute Nouveau

• 26 Février 2016

• #9

Re : Masquer ligne automatiquement même en présence de filtre

Bonjour Chris, ça ne fonctionne pas. ça me met "erreur de compilation, Sub ou Function non defini" et il me met listobljet en surbrillance.

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 26 Février 2016

• #10

Re : Masquer ligne automatiquement même en présence de filtre

RE

J'ai ajouté le fichier à mon poste précédent : tu verras que cela fonctionne !

 

Vote positif 0 Vote négatif

N

nanou0186

XLDnaute Nouveau

• 26 Février 2016

• #11

Re : Masquer ligne automatiquement même en présence de filtre

Je t'embête mais comment fais tu pour tout afficher car j'arrive pas à voir.
Ma macro afficher ne fonctionne plus
Encore merci pour ton aide

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 26 Février 2016

• #12

Re : Masquer ligne automatiquement même en présence de filtre

Bonjour

Je n'ai pas touché à tes macros.
Il y a dans Excel un boutons qui annule le filtre : entonnoir avec la croix.

Dans la mesure où le code ajouté refiltre automatiquement les lignes mères, il faut le mettre en commentaires ou passer en calcul manuel si tu veux les voir.

 

Vote positif 0 Vote négatif

N

nanou0186

XLDnaute Nouveau

• 26 Février 2016

• #13

Re : Masquer ligne automatiquement même en présence de filtre

j'arrive pas à l'afficher. il ne me le prend pas quand je retire l'entonnoir.
si je comprends bien, la macro fonctionne comme suit :
dès que je coches * ou x dans la colonne mère, la macro se lance directe, et la ligne est maquée ?
Si c'est bien ça, est ce possible de faire une macro, en appuyant sur un bouton pour afficher les lignes masquées de la ligne mère ?
d'avance merci encore pour ton aide

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 26 Février 2016

• #14

Re : Masquer ligne automatiquement même en présence de filtre

RE

Dès que la cellule S1 se recalcule, les lignes ayant une valeur en colonne Mère se masquent.
Donc que ce soit une modification de valeur (ajout, suppression) ou un filtre/défiltre cela se calcule

Comme déjà dit : pour tout voir soit tu mets tout le code de l'onglet en commentaire soit tu passes en calcul manuel avent d'afficher tout.

Cette dernière option est plus simple et ne nécessite pas de macro.

 

Vote positif 0 Vote négatif

N

nanou0186

XLDnaute Nouveau

• 26 Février 2016

• #15

Re : Masquer ligne automatiquement même en présence de filtre

Tu vas penser que je suis un boulet, mais je ne comprends pas repasser en manuel. Pour voir la ligne qui est masquée, je suis obligée de supprimer la formule dans S1, je n'y arrives autrement.
Ca sera plus simple pour moi, si j'avais un bouton qui me permet d'afficher ma ligne masquée

 

Vote positif 0 Vote négatif