sheetveryhiddenn(passworld)

lolo · 7 Mai 2006

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 · 7 Mai 2006

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 · 7 Mai 2006

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 · 7 Mai 2006

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 · 7 Mai 2006

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

sheetveryhiddenn(passworld)

lolo

Guest

lio

XLDnaute Occasionnel

lolo

Guest

_Thierry

XLDnaute Barbatruc

lio

XLDnaute Occasionnel

Discussions similaires