Rendre une feuille inaccessible

Bonjour

je me demandais s'il etait possible de rendre une feuille de mon classeur inaccessible ( sous une condition donnée ) depuis une macro

et de la rendre accessible ( sous une autre condition) ?

Merci pour vos idées

Bonjour,

Peux-tu essayer ce petit code :

'Mettre ce code sous la feuille
Private Sub Worksheet_Activate()
Utilisateur = Application.UserName
If Utilisateur = "Air_2" Then
SH1.Activate 'condition respectée feuille selectionnée
Else
SH2.Activate 'condition non respectée feuille suivante
End If
End Sub

A très vite

Air_2

Salut le forum

Il suffit simplement de masquer les feuilles.

Sheets("BlaBlaBla").Visible = False
ou
Sheets("BlaBlaBla").Visible = xlSheetVeryHidden

Mytå

Merci Myta ! j'ai opté pour ta seconde solution plus simple , toutefois je rencontre un bug du type "Impossible de définir la propriété Visible de la classe worksheet" mon code etant placé sur une feuille .

Re le forum

Ton classeur doit contenir au moins une feuille visible, tu dois essayer de

masquer la seule feuille visible du classeur.

Mytå

Rechercher des sujets similaires à "rendre feuille inaccessible"