Afficher des onglets avec mot de passe

Bonjour,
J’aimerais que lorsque l’on clique sur le bouton macro, les onglets masqués s’affichent que si la personne connaît le mot de passe.
Si possible mot de passe facile à changer.
Merci
Masque-affiche mot de passe .xlsm (21,9 Ko)

Bonjour,

Au plus simple (mot de passe = 123) —> voir dans la macro
Cela masque la barre d’onglet et empêche l’aller sur les autres onglets

Masque-affiche mot de passe .xlsm (20,0 Ko)

les macros :

Sub Affiche()
    If ActiveWindow.DisplayWorkbookTabs = False Then 'si la barre d'onglet n'est pas visible
        If InputBox("Entrer le mot de passe !") = "123" Then 'à adapter
            ActiveWindow.DisplayWorkbookTabs = True 'affiche la barre d'onglet
        Else
            MsgBox "Mot de passe incorrect !"  'message d'erreur
        End If
    End If
End Sub

Sub Cacher()
    ActiveWindow.DisplayWorkbookTabs = False 'masque la barre d'onglet
End Sub

Cela dit, ne pas omettre de bloquer l’accès au développeur :wink:

Bonjour Mimimathy
Tout cela, me paraît très bien, bon je préciserais comme d’habitude
Je teste sur le « vrai fichier » et je note résolu avec mention excellente.

« Cela dit, ne pas omettre de bloquer l’accès au développeur »
Je n’ai pas compris
Cordialement,

Re,

Eh bien, c’est simple
si tu as accès au développeur soit par le menu d’Excel soit par ALT F11
les feuilles (ou onglets) on les affichent comme on veut, et en prime

On a accès au mot de passe

A savoir qu’un classeur EXCEL est déblocable par plusieurs façons,
simplement en ouvrant un classeur par OPEN OFFICE les Mdp des feuilles font comme “Manuel”, elles “Valsent” :grin:
Pour avoir un classeur entièrement protégé, et se casser les doigts dessus, la conception est beaucoup plus “HARD”

1 J'aime

Re
Parfait
Merci Mimimathy
À bientôt

Re,
Si le problème est résolu, n’oublie pas de passer le post en résolu :wink:

Re
Sauf erreur de ma part, c’est fait et avec un petit coeur