Protection onglet [Résolu/Fermé]

Signaler
Messages postés
98
Date d'inscription
mercredi 16 décembre 2015
Statut
Membre
Dernière intervention
28 mai 2019
-
Messages postés
98
Date d'inscription
mercredi 16 décembre 2015
Statut
Membre
Dernière intervention
28 mai 2019
-
Bonjour,

j'ai un ficher avec 4 onglet (hrs entrepreneur, saisie, matériels et procèdure)
j'ai masquer mon onglet "hrs entrepreneur) et installer une macro dans l'onglet saisi pour pouvoir permettre l'affichage et ouverture de l'onglet avec la saisi d'un mot de passe.
mon problème c'est que l'on peu afficher l'onglet a partir de l'option afficher et masque les onglet et que si je protège le classeur ma macro plante.

Est-ce qu'il y a moyen de régler ce problème?

Merci

Voici ma macro

Dim mdp As String, testmdp As String

mdp = "XXXXX"

reco:
testmdp = InputBox("Introduisez le mdp pour passer en mode administrateur")

If testmdp = mdp Then
Sheets("Hrs entrepreneur").Visible = True
ElseIf testmdp <> "" Then
MsgBox "Mot de passe erroné" & Chr(10) & "Réessayez pour passer en mode Administrateur" & Chr(10) & "ou laissez vide pour rester en mode normal"
GoTo reco
End If
'
Sheets("Hrs entrepreneur").Select
Range("b9").Select
End Sub

3 réponses

Messages postés
14934
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 251
Bonjour,

mon problème c'est que l'on peu afficher l'onglet a partir de l'option afficher
Tu veux de la protection et tu mets une clé à ta feuille : normal tu as beaucoup de richesse dans ton classeur.

Tu veux de la protection et tu mets une clé à ta porte : normal tu as beaucoup de richesse dans ta maison.
Dans les 2 cas si le jeu en vaut la peine, le cambrioleur trouvera le moyen de rentrer avec une différence tout de même. Si l'on rentre dans ta maison tu constateras la disparition des biens mais dans ton classeur l'on peux emporter son contenu sans que tu le saches.

Tout cela pour te dire que ce n'est pas avec une macro basique que l'on peut outrepasser facilement que tes données seront protégées. Pour que ta macro ne plante pas tout de même, sache qu'il te faut protéger ton classeur par macro avec les bons paramètres qui sont très bien expliqués dans l'aide de la fonction sous excel.
Messages postés
30425
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
30 novembre 2020
3 040
Bonjour,


mon problème c'est que l'on peu afficher l'onglet a partir de l'option afficher et masque les onglet


Pour régler le souci d'affichage, au lieu de juste masquer la feuille... il faut la rendre "veryhidden"
Sheets("Hrs entrepreneur").Visible = xlVeryHidden


et que si je protège le classeur ma macro plante.

C'est normal.
Pour pouvoir te servir de ta feuille dans tes macros, tu dois d'abord (comme l'indique gbinforme) la déprotéger par macro, puis la re-protéger lorsque tu as terminé.
Et de façon à ce que les utilisateurs ne puissent pas voir les éventuelles manipulation que tes macros réalisent sur cette feuille, tu place au début de ton code
Application.ScreenUpdating = False 

Puis tu le remets à true une fois les traitements terminés.





Messages postés
98
Date d'inscription
mercredi 16 décembre 2015
Statut
Membre
Dernière intervention
28 mai 2019
6
Parfait merci