XL 2013 Masquer ligne et feuille selon condition

TAHANI · 19 Décembre 2016

Bonjour,

J'ai un tableau Récap et des feuilles correspond à chaque cellule dans la colonne A et chaque ligne correspond à un onglet. J'aurais besoin d'aide pour créer un bouton qui me permette de masquer une ligne et la une feuille qui porte le même nom, si la valeur de la colonne I correspondante = 0. Je souhaiterais avoir un autre bouton qui démasque.

Par exemple, dans le tableau que je joins, la cellule F13=0, je veux donc masquer la ligne 13 et la feuille "A.1"

Merci beaucoup
NB : C'est très urgent

Ci-joint le tableau Récap.

Hieu · 19 Décembre 2016

Salut,

Pour masquer :

VB:

Sub masquer()
Application.ScreenUpdating = False
For i = 2 To 9
    nom = Range("a" & i)
If Range("i" & i) = 0 Then
    Rows(i).EntireRow.Hidden = True
    Sheets(nom).Visible = False
End If
Next i
End Sub

Pour afficher :

VB:

Sub afficher()
Application.ScreenUpdating = False
For Each r In Rows("2:9"): r.Hidden = False: Next r
For Each s In Sheets: s.Visible = True: Next s
End Sub

++

XL 2013 Masquer ligne et feuille selon condition

TAHANI

XLDnaute Nouveau

Pièces jointes

Hieu

XLDnaute Impliqué

Discussions similaires

XL 2013 Masquer ligne et feuille selon condition

TAHANI

XLDnaute Nouveau

Pièces jointes

Hieu

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency