VBA Excel - Mot de passe et Utilisateurs

Bifidus -  
 Bifidus -
Bonjour, à tous

Dans l'exemple ici https://www.commentcamarche.net/faq/37104-vba-excel-mot-de-passe-et-utilisateurs

Si je souhaites l'essai l'accès à plusieurs feuilles sans être obligé de s'identifier dans cette partie du code comment l'organiser ? Feuil1, Feuilé, Feuil3 

'Masque toutes les feuilles sauf la feuille "Feuil1"
'!!!! ADAPTEZ le nom de la feuille qui doit rester affichée
For Each Ws In ThisWorkbook.Worksheets
    If Ws.Name <> "Feuil1" Then Ws.Visible = xlSheetVeryHidden
Next Ws


Merci pour vos réponses et bonne journée.
A voir également:

2 réponses

Réponse 1 / 2
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour, 

Sub test()
    For Each Ws In ThisWorkbook.Worksheets
        'test nom onglet a afficher
        If Ws.Name = "Feuil1" Or Ws.Name = "Feuil2" Or Ws.Name = "Feuil3" Then
            Ws.Visible = True
        Else
            'masque ce qui n'est pas a afficher
            Ws.Visible = xlSheetVeryHidden
        End If
    Next Ws
End Sub
0
Réponse 2 / 2
Bifidus
 
Merci pour la réponse, ça marche.
0

Discussions similaires

Mot de passe administrateur Freebox : où le trouver ?
Utilisateur anonyme -
Marie -

7 réponses
Trouver le mdp administrateur freebox ?
Cousyn -
Pierr10 -

1 réponse