Sélection feuille par userform

[Sébbb]

Bonjour à toutes et à tous,
J'ai un pb de feuille visible ou non.
J'ai réalisé un USF dans un classeur avec 10 feuilles (par exemple),
Sur ce USF j'ai mis 10 checkbox, un pour la visualisation de chaque feuille.
Si je coche checkbox1, il ne dois etre visible ds le classeur que la feuil1, checkbox2 je vois feuil2...
Et si je coche plusieurs checkbox, je dois voir les feuilles s'y rapportant. Par ex, je coche chekbox1 et 3, je dois voir dans le classeur que les feuilles 1 et 3.

Si quelqu'un peut m'apporter son aide, ce serait très sympa. Merci à vous tous.

ps: mon classeur comporte en vrai environ 25 feuilles.

Abientôt,
Sébbb

 

[myDearFriend!]

Bonsoir Sebbb, le Forum,

Tu trouveras ci-joint un exemple qui répondra peut-être à ta demande...

Cordialement, [file name=mDF_SelectFeuilles.zip size=20758]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/mDF_SelectFeuilles.zip[/file]

 

[Sébbb]

Bonjour myDearFriend!,

Merci pour ton aide, ton fichier semble correspondre à ce que je souhaite faire.
J'ai regardé le code et y ai vu quelque chose que j'ai déjà rencontré:

UserForm1.Show 0
Peux-tu me dire à quoi sert le 0 STP.

Je vais regarder d'un peu plus près et essayer d'appliquer ton code à mon classeur, je te tiens au courant.

A bientôt et encore Merci!

Sébbb

 

[myDearFriend!]

Bonjour Sebbb,

Pour cet exemple, j'ai choisi de lancer l'USF en mode non modal.

Et si jamais tu te dis : 'Heu... c'est quoi un 'mode non modal' ?' 🙂   : pour tout savoir, vas voir ce lien Lien supprimé dans lequel _Thierry te donnera toutes les explications nécessaires...

Cordialement,

 

[Sebbb]

Ok, c'est très clair!
Je ne connaissais pas et c'est vrai que ca peut être pratique.

Par contre, j'ai un ptit soucis pour adapter ton code à mon classeur car, dans ce classeur, par macro, à un moment je rajoute 2 feuilles et elles semettent vraiment la ou elle veulent:

avant lancement:
feuil11(feuil11)
feuil13(feuil13)
feuil30(feuil30)

1er lancement de macro:
feuil1(nvelle1)
feuil11(feuil11)
feuil13(feuil13)
feuil21(nvelle2)
feuil30(feuil30)

je supprime les nvelles;

2eme lancement:
feui11(feuil11)
feuil12(nvelle1)
feuil13(feuil13)
feuil2(nvelle2)
feuil30(feuil30)

On s'appercoit alors que sheets(1) est la première fois la feuil1 et la seconde fois que sheets(1) est la feuil11
Or moi, si je coche checkbox1, je veux voir la feuil11.

J'epère que tu comprends le pb,(que je n'arrive pas bien à expliquer)
Ce qui me gène dans ton code, c'est qu'il faut que les feuilles soient toujours dans le même ordre.

Si tu as une idée pour arranger ca, je te remercie.

A+
Sébbb

 

[myDearFriend!]

Re Sebbb,

A mon avis, le plus simple serait que tes nouvelles feuilles s'insèrent d'office après le dernier onglet (donc en dernière position). Pour ça, tu peux utiliser le code ci-dessous pour les créer :

ActiveWorkbook.Sheets.Add After:=Worksheets(Worksheets.Count)

J'espère que tu ne vas pas te lancer dans la modification dynamique de l'USF au fur et à mesure que tu rajoutes des feuilles, car là, ce serait une toute autre affaire dans laquelle je ne m'engagerais pas si j'étais à ta place...

Cordialement,