Protection onglet Résolu/Fermé

Question

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

gbinforme · Answer

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.

jordane45 · Answer

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.

juer31 · Answer

Parfait merci

Protection onglet

3 réponses

Discussions similaires