masquer 0%

Efgé

XLDnaute Barbatruc

• 16 Octobre 2012

• #16

Re : masquer 0%

Re à tous, Bonjour Si, @desatan Mets ton vrai classeur en pièce jointe après avoir tout enlevé sauf la colonne 17 . On comprendra peut être mieux, peut être.... Cordialement

 

Vote positif 0 Vote négatif

D

desatan

XLDnaute Occasionnel

• 16 Octobre 2012

• #17

Re : masquer 0%

fichier en pj merci
c'est même la colonne 19 😱

 

Pièces jointes

• test.xls

  113 KB · Affichages: 32
• test.xls

  113 KB · Affichages: 40
• test.xls

  113 KB · Affichages: 37

Dernière édition: 16 Octobre 2012

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 16 Octobre 2012

• #18

Re : masquer 0%

Salut Si...MonSalopiaud😛, le Forum

Si... à dit:

Dull😉 fais bien de te proposer, dans ce cas, le Bouton bascule et Si... tu utilises sa particularité, tu as un code très court (testé avec son fichier)

Cliquez pour agrandir...

Heu...Prime...J'ai Honte😱...Secondo... jenesaispasoùmemettre,😱 Troisièmement...Entre Fred🙂 , Si... 🙂 et MonJC...🙂 Tu es entre de bonne mains🙂🙂🙂...

Bonne Journée

 

Dernière édition: 16 Octobre 2012

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 16 Octobre 2012

• #19

Re : masquer 0%

Bonjour à tous,

La colonne R est la 18 pas la 17....

A + à tous

 

Pièces jointes

• JC Test Masque 0.xls

  124 KB · Affichages: 34

Dernière édition: 16 Octobre 2012

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 16 Octobre 2012

• #20

Re : masquer 0%

salutous

tu vas en voir de toutes les couleurs avec l'adaptation de JCGL😉.
Pour éviter de chercher le numéro de la colonne, tu peux écrire

For L =3 to Range("S" & Rows.Count).End(xlUp).Row
Rows(L).Hidden = IIf(ToggleButton1 And Cells(L, "S") = 0, 0, 1)
Next

Cliquez pour agrandir...

Quand on masque je pense qu'il n'est pas nécessaire de remonter (contrairement à la suppression des lignes).

@Dull : un citron vert et "toute honte bue" 😉

 

Vote positif 0 Vote négatif

D

desatan

XLDnaute Occasionnel

• 16 Octobre 2012

• #21

Re : masquer 0%

je suis paumé🙁 quelqu'un peut il me réécrire une formule en entier ?
merci

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 16 Octobre 2012

• #22

Re : masquer 0%

Bonjour à tous,
Salut Si...,

Desatan : le code est déposé dans le module de la feuille du fichier # 19... Avec les valeurs en colonne S...

A + à tous

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 16 Octobre 2012

• #23

Re : masquer 0%

re

avec une image (Si... tu veux les couleurs, corrige en prenant le code de JCGL : clic bouton droit sur le nom de l'onglet puis Visualiser le code pour entrer dans l'éditeur VBA).

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 16 Octobre 2012

• #24

Re : masquer 0%

Re à Tous, Salut JC 🙂 🙂
Bon je pense que le vrai problème est la gestion d'un contrôle active X.
Puisqu'il semble qu'il puisse y avoir beaucoup de ligne, et comme le code ne semble pas être un frein 🙄
Je propose, après les blocages d'usage :

VB:

With CommandButton1
    If .Caption = "Afficher les lignes" Then
        .Caption = "Masquer les lignes"
        Rows.Hidden = False
    Else
        .Caption = "Afficher les lignes"
        For i = Cells(Rows.Count, 19).End(xlUp).Row To 4 Step -1
            If Cells(i, 19).Value = 0 Then Set R = Union(Rows(i), IIf(R Is Nothing, Rows(i), R))
        Next i
        If Not R Is Nothing Then R.EntireRow.Hidden = True
    End If
End With

Cordialement

 

Pièces jointes

• desatan_CommandButton.xls

  135 KB · Affichages: 38
• desatan_CommandButton.xls

  135 KB · Affichages: 40
• desatan_CommandButton.xls

  135 KB · Affichages: 38

Vote positif 0 Vote négatif

D

desatan

XLDnaute Occasionnel

• 17 Octobre 2012

• #25

Re : masquer 0%

super merci à tous cela fonctionne 🙂

 

Vote positif 0 Vote négatif

D

desatan

XLDnaute Occasionnel

• 9 Novembre 2012

• #26

Re : masquer 0%

bonjour à tous,

J'aurai besoin d'une petite évolution.
En plus de l'existant, j'aimerai que cela me masque toutes les lignes à 0 sur la feuille 2.
Comment faire ?

Merci par avance

 

Pièces jointes

• desatan_CommandButton.xls

  144.5 KB · Affichages: 25
• desatan_CommandButton.xls

  144.5 KB · Affichages: 29
• desatan_CommandButton.xls

  144.5 KB · Affichages: 27

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 9 Novembre 2012

• #27

Re : masquer 0%

Bonjour desatan, le fil
Ce que j'ai compris : Masquer les lignes de la feuille 2 si la somme des cellules de C a H est égale à 0 avec le bouton de la feuille 1.
Cordialement

 

Pièces jointes

• desatan_CommandButton(2).xls

  156 KB · Affichages: 36

Vote positif 0 Vote négatif

D

desatan

XLDnaute Occasionnel

• 9 Novembre 2012

• #28

Re : masquer 0%

super merci

 

Vote positif 0 Vote négatif