Macro pour afficher une feuille veryHidden

[leblond]

Bonjour à Le forum,
Bonjour à tous,

J'ai un fichier sur lequel je dois tout vérouiller puisque qu'il sera acessible à de nombreuses personnes mais ne disposant pas des mêmes droits d'accès.
Mon piti problème est le suivant : J'ai une feuille que j'ai passé en VeryHidden pour que personne ne la voie mais j'aimerais mettre sur une autre feuille un bouton qui affiche cette feuille en cliquant dessus.
Et figurez vous que je ne trouve nul part le code pour afficher une feuille qui est en veryHidden via un bouton...

Pour info, j'ai passé ma feuille en veryHidden dans les propriétés et Visible.

Je ne met pas de fichier d'exemple parce que ça me parait simple à comprendre sans mais si besoin je me ferais un plaisir de vous le fournir!

Love.

 

[Pierrot93]

Re : Macro pour afficher une feuille veryHidden

Bonjour,

essaye ceci :

Feuil1.Visible = xlSheetVisible

bonne soirée
@+

 

[phlaurent55]

Re : Macro pour afficher une feuille veryHidden

Bonjour leblond,

il suffit (dans la macro) de changer la propriété .Visible de la feuille
Sheets(1).Visible=XlSheetVisible

à+
Philippe

Edit: Bonjour Pierrot

 

[leblond]

Re : Macro pour afficher une feuille veryHidden

Super je sais pas ce que j'avais foutu, ç'était simple en plus...

Petite question subsidiaire : comment faire en sorte que la feuille retourne au status VeryHidden lorsque l'on enregistre le fichier?

merci à vous!

 

[Pierrot93]

Re : Macro pour afficher une feuille veryHidden

Re, bonsoir Philippe,

A placer dans le module "thisworkbook" :

Option Explicit
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Feuil1.Visible = xlSheetVeryHidden
End Sub

 

[leblond]

Re : Macro pour afficher une feuille veryHidden

réactivité, efficacité, en trois mots commençant : Je vous aime!

Merci à vous deux pour ces réponses claires et précises!