Discussion :

[IHO17]

Bonjour à tous,

Je suis actuellement en train de travailller sur un fichier EXCEL contenant 13 onglets. Je voudrais ajouter un onglet qui s'appelera "Select Template", dans lequelle l'utlisateur pourra cliquer sur une des cases options puis sur le bouton "Importer Template" qui affichera selon le ou les cases options selectionnés le ou les onglets correspondants.

Les cases options sont une liste de pays (ex: France, Italy, etc...) et chaque onglets ou feuilles correspond à un pays.

Le but est que mes collégues n'est pas accés au onglets qu'à travers la page acceuil.

Un deuxième bouton ("Retour_Accueil") sur chaque onglet ("Template_Pays") permettra de revenir à la page d'acceuil ("Select_Template").

Vous trouverez ci-joint un fichier exemple.

Merci vraiment et d'avance pour vos conseils.

Cdt

[Menhir]

Pour afficher/masquer un onglet en VBA, il faut utiliser la Propriété Visible de la Worksheet correspondant à l'onglet.
https://msdn.microsoft.com/fr-fr/lib.../ff197786.aspx

[IHO17]

Merci Menhir, mais comment lier la selection de la case option et l'affichage de l'onglet?

[Menhir]

Comme beaucoup de participants, je n'ouvre pas les pièces jointes.
https://www.developpez.net/forums/d8...s-discussions/

Je ne sais donc pas comment sont organisées tes cases options.
D'autant plus que ton expression "cliquer sur une case" laisse supposer que ces "cases" ne sont pas des cellules.

[boisgontierjacques]

Bonjour,

Exemples

Boisgontier

[IHO17]

Je suis vraiement désolé si je ne suis pas clair sur certains points mais je ne suis pas du tout de ce milieu et mes connaissances en VBA sont plus que limités...

En gros, mon fichier est composé de 14 onglets, dont un sera une sorte de page acceuil et à partir de laquelle les utilisateurs de cet outil pourront choisir leur onglet et ce selon la checkbox qu'ils auront coché. ils peuvent en cocher plusieurs et du coup les onglets correspondants s'afficheront sinon tout reste masqué.


J'aimerai juste avoir la formule disant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 For I = 1 To 14
  If Me.checkbox("CheckBox" & I).Value = True Then
  For I = 1 To 14
  Sheet& I.Visible = True
  Else
  Sheet& I.Visible = 
Next I

'Notez que le nom des feuilles sont numéroté comme les Checkbox...

Le but est que l'utlisateur en cochant sur la ou les checkbox de son choix puis en cliquant sur le bouton (auquel j'affecterai la macro)), les onglet correspondants s'affichent.

Je patoge depuis ce matin!

Merci d'avance!