sheetveryhiddenn(passworld)

[lolo]

bonjour le forum,


voila j'ai télécharger l'excellent travail de Thierry mais quand je l'aplique à mon projet j'ai un ptit souci.

Voila le programme marche mais quand l'utilisateur quitte le programme en sauvegardant, il revient sur les feuilles qui à le droit de voir.(mon souci je voudrais qu'il revienne à l'interface pour ressaisir son code .
Je pense que le problème vient du workbook_open.
Je ne vois pas quel code introduitre.
Merci à tous de votre aide

Bon week-end à tous
Lolo

Lien supprimé

 

[lio]

Salut,

Je confirme que @Thierry fait des très bonnes démo !

Ci joint une solution :

Private Sub Workbook_Open()
Niv1.Visible = xlSheetVeryHidden
Niv2.Visible = xlSheetVeryHidden
Userform1.show
End Sub

 

[lolo]

bonjour le forum,

bonjour lio,

après essai de ton code, tout marche comme je voulais.

moi je me compliquais plus pour mettre mon code, je mettais:

sheets('niv1').visible= false

je comprends pkoi cela marchait pas.

bon week-*end à tous.

trop fort ce forummmmmmmmmmmmm

 

[_Thierry]

Bonjour Lolo, Lio, le Forum

Bon et bien merci Lio, il ne me reste plus qu'à vous souhaiter un bon Dimanche alors

Juste en vous lisant, je le ferai plutot sur l'évènementielle 'Workbook_BeforeSave' à la fermeture.... (au cas où un utilisateur ouvre le fichier sans activer les macros).

Bon Dimanche
@+Thierry[ol]

 

[lio]

Re,salut Thierry ( quand on parle du loup...)

Ton code:
Private Sub Workbook_Open()
ThisWorkbook.Sheets('Niveau1').Visible = False
ThisWorkbook.Sheets('Niveau2').Visible = False

End Sub

Faire attention à l'appelation de la feuille: Ainsi:

Sheets('Niv1').visible = False ne marchera pas et bug il me semble.

Message édité par: lio, à: 07/05/2006 14:31