Afficher une feuille masquer

Bonjour

J'ai dans mon classeur 7 feuilles et une feuille "Index" j'ai un code pour masquer ou afficher tous les onglets

mon code:

Private Sub CommandButton1_Click()

If CommandButton1.Caption = "Masquer toutes les feuilles sauf Accueil !" Then

CommandButton1.Caption = "Afficher tous les Onglets"

Dim i As Integer

For i = 2 To Sheets.Count

Sheets(i).Visible = xlSheetHidden

Next i

Else

CommandButton1.Caption = "Masquer toutes les feuilles sauf Accueil !"

For i = 2 To Sheets.Count

Sheets(i).Visible = True

Next i

End If

End Sub

Je cherche un code VBA pour afficher une feuille masquer avec un bouton qui se trouve sur ma feuilles "Index"

Je vous remercie d'avance

Max

Bonjour

Supprime les liens de tes boutons et affecte leur le code

Sub Ellipse1_Cliquer()
    Sheets("Feuil2").Visible = True
End Sub

Bye !

Salut gmd

je te remercie et te souhaite une bonne soirée

Max