Selectionner feuille avec un bouton

Bonjour à tous ,

Ma question été de savoir si une procédure que les miennes existes,

En fait j'ai 46 boutons (donc 46 fois la même procédure) qui démaque et ouvre la feuille correspondant au n° du bouton,

Pour simplifier mon classeur je cherché cette solution en une seule et même procédure, mais toujours avec les 46 boutons.

Coco

Ci joint le classeur

Bonjour

Sub ShapeClick()
Sheets(ActiveSheet.Shapes(Application.Caller).TextFrame.Characters.Text).Visible = True
Sheets(ActiveSheet.Shapes(Application.Caller).TextFrame.Characters.Text).Activate
End Sub

Cordialement

Bonjour Amadéus,

Je te remercie, ça fonctionne comme je l’espérai.

Merci encore.

Cordialement Coco

Bonjour Amadéus,

Donc comme dit tout fonctionne super, je reviens vers toi parce que j' ai essayer de faire fonctionner ta macro sur un formulaire

avec un CommandButton, j'ai essayer de la faire marcher impossible de mon coté....

Peu tu faire quelque chose.

Merci

Cordialemnt

Bonjour

Et tu veux faire quoi avec un CommandButton?

La macro identifie le bouton cliqué sur la feuille et active la feuille correspondante.

Rien à voir avec un CommandButton

Cordialement

Bonsoir

Je voudrai faire un peu la même chose qu'avec mes forme ou j'ai attribué ta macro! activer un onglet, masqué, démasqué un onglet!

Mais je voudrai le faire depuis un userform, donc avec un CommandButton.

Merci

Bonjour

Je n'ai pas cela en réserve, mais j'ai un affichage PopUp

(Les onglets sont masqués)

Cordialement