Peu tant coder une feuille par un mot de passe

Salut tout le monde

Voilà ma question est : peu tant coder une feuille par un mot de passe

Par exemple mon classeur a 3 feuille toute son visible mais la feuille 3 ne peut être vu que avec un mot de passe.

Merci

Salut, on ne peut pas à moins de magouiller.

dans le code de la feuille 1 :

Dim ok As Boolean

Private Sub Worksheet_Activate()

    Call passwd(ok)

    ok = False

End Sub

Private Sub passwd(Optional valid As Boolean)

    If ok = False Then

        Worksheets("Feuil2").Activate
        mdp = InputBox("Mot de passe :")
        If Not mdp = "0000" Then
            MsgBox ("Mauvais mot de passe")
            Exit Sub
        Else:
            ok = True
            Worksheets("Feuil1").Activate
        End If

    End If

End Sub

Mais du coup tes macros doivent être toujours activées et tu dois aussi protéger ton code.

Pour plus d'efficacité masque la feuille 1.

ça marche trés bien

merci