Bouton avec Mot de passe Afficher Masquer Onglets

Bonjour à tous ,

J'ai une application avec une feuille principale "Menu" qui est visible à l'ouverture et pas mal autres boutons.

J'ai mis un bouton pour afficher et masquer les onglets, qui fonctionne.

Ce que souhaiterais c'est que seul l'administrateur puisse afficher et masquer les onglets.

Peut être un User et un mot de passe.

Est ce possible. ?

Je vous joints le ficher.

Amicalement,

MM

Bonsoir,

Tu peux faire un petit truc avec une "InputBox" du genre :

Sub test()

    'Macro enregistrée le 15/02/2012 par
    If ActiveWindow.DisplayWorkbookTabs = False Then
        If InputBox("Entrer le mot de passe !") = "MotDePasse" Then 'à adapter
            ActiveWindow.DisplayWorkbookTabs = True
        Else
            MsgBox "Mot de passe incorrect !"
        End If
    End If

End Sub

Sub Cacher()

    'pour cacher les onglets
    ActiveWindow.DisplayWorkbookTabs = False

End Sub

Ensuite, il te faut protéger ton projet VBA, donc Outils->Propriétés de VBAProject...->Onglet "Protection" tu entre un mot de passe, tu coche la case puis tu enregistre et tu ferme ton classeur. Tu le réouvre et tu teste pour voir. Attention, il est assez facile de casser la protection avec un logiciel conçu à cet effet.

Hervé.

Bonjour Theze,

Merci pour ta réponse.

Pour l'instant celà fonctionne.

Le projet est pour l'entreprise de mon mari, donc il va rien craquer du tout.....

Pour la personne qui saisi, pas assez de neuronnes pour craquer ....

Cordialement,

MM