Code Vba Pour masquer les Feuilles

Résolu
gham Messages postés 48 Date d'inscription   Statut Membre Dernière intervention   -  
 MOMO -
Bonjour,
Je voudrais un code vba pour masquer les feuilles d'un classeur qu'on ne peut pas les afficher à partir du Format/Feuille/Afficher.
Avec tous mes respects.

10 réponses

eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Bonsoir,

Juste un complément à la macro de michel qui n'a pas dû tout lire.

Pour ne pas pouvoir les ré-afficher par le menu remplace:
.Visible = 0 par .Visible = xlSheetVeryHidden
Sub masquer()
    Dim nbre As Byte, cptr As Byte
    Application.ScreenUpdating = False
    nbre = ThisWorkbook.Sheets.Count
    cptr = 2
    For cptr = 2 To nbre
        Sheets(cptr).Visible = xlSheetVeryHidden
    Next
    Application.ScreenUpdating = False
End Sub
eric
19
MOMO
 
merci mr ERIC
0