Empêcher l'accès à des onglets cachés

Bonsoir à tous,

Dans un classeur, j'ai plusieurs onglets masqué dont je voudrais empêcher l'accès.

Qu'elle solution d'après vous serait la plus adaptée ?

En vous en remerciant bien par avance.

Cordialement.

Salut il y a peut être d'autres solutions mais je donne la mienne quand même :

Dans la feuille concernée, tu ajoutes ce code (clique droit > visualiser le code:

Private Sub Worksheet_Activate()
Sheets("Feuil2").Visible = False
End Sub

Quand l'utilisateur veut afficher la feuille, elle se masque automatiquement

Bonsoir

Tes onglets tu les masque avec l'option xlSheetVeryHidden

Soit par code style

Sub test()
  Sheets("Feuil2").Visible = xlSheetVeryHidden
End Sub

Soit en mettant la propriété, de la feuille, Visible à xlSheetVeryHidden

Et en plus si tu protèges ton projet, cela découragera beaucoup de personnes

Bonsoir,

Merci pour vos deux interventions.

Par contre en testant ceci, je pourrais toujours en avoir un accès ultérieurement?

Cordialement.

Bonsoir

dyscus a écrit :

Par contre en testant ceci, je pourrais toujours en avoir un accès ultérieurement?

Bien sur, il suffit d'inverser l'état de Visible : xlSheetVisible

Cette semaine je suis sur MAC, c'est donc plus compliqué pour moi d'intégrer une macro (déjà que je suis border line ).

Je veux dire par là, que je suis plus à l'aise sur PC, je pourrais tester cela en début de semaine prochaine.

Je vous tiens informé dans tous les cas.

Merci bien et bonne soirée.

Bien cordialement.

Dans mon cas de figure tu vas dans :

onglet développeur / visual basic

puis dans l'explorateur de projets (Ctrl+R) puis sélectionne la feuille concernée (l'onglet) le code s'affiche :

Change le code

Sheets("Feuil2").Visible = true

Pour pouvoir visualiser la feuille

Rechercher des sujets similaires à "empecher acces onglets caches"