Cacher feuilles inactives

[c@ro]

Bonsoir à tous,

Je travaille sur un fichier qui contient plusieurs feuilles.
J'ai créé un userform pour saisir différentes infos et choisir la feuille sur laquelle on veut travailler.
Je bloque sur un point surement tout bête mais voilà je me lance. Je souhaiterai, une fois le userform validé, que seulement la feuille active apparaisse.

Je vous joins le fichier sur lequel je travaille pour que vous puissiez mieux visualiser.
Cijoint.fr - Service gratuit de dépôt de fichiers


Merci d'avance pour votre aide

 

[JCGL]

Re : Cacher feuilles inactives

Bonjour à tous,

Ton lien semble invalide

A + à tous

 

[c@ro]

Re : Cacher feuilles inactives

Oups!
J'ai modifié le lien j'espère que cela va marcher

 

[JCGL]

Re : Cacher feuilles inactives

Bonjour à tous,

Peux-tu essayer ceci dans l'Initialize :

Private Sub UserForm_Initialize()
    Dim F As Worksheet
    For Each F In ThisWorkbook.Worksheets
        ComboBox1.AddItem F.Name
        If F.Name <> "PAGE DE GARDE" Then F.Visible = xlSheetHidden
    Next F
End Sub

A + à tous

 

[JCGL]

Re : Cacher feuilles inactives

Bonjour à tous,
Salut CC,

Je dépose le fichier sur XLD, bien au chaud, car je pense n'avoir pas tout compris...

A + à tous

 

[c@ro]

Re : Cacher feuilles inactives

Merci pour ta réponse.
J'ai testé, cela marche toutes les feuilles sont cachées sauf la feuille "page de garde", maintenant comment faire pour que cela soit la feuille active qui s'affiche? j'ai essayé en remplaçant 'Page de garde" par "activesheet.name" mais j'ai une erreur qui s'affiche.

 

[c@ro]

Re : Cacher feuilles inactives

Désolée je n'avais pas vu ton dernier message, merci beaucoup c'est exactement ce que je voulais faire!!

 

[JCGL]

Re : Cacher feuilles inactives

Bonjour à tous,

Il faut au moins une feuille visible... pour qu'Excel fonctionne.
Tu choisis ta feuille par la Combo1 (ta combo de choix d'analyse)...

Tu écris :
Je souhaiterai, une fois le userform validé, que seulement la feuille active apparaisse.

A + à tous

Edition : A la bonne heure, merci de ton retour