faire apparaitre certains onglets uniquement

[pascal21]

bonsoir et re
toujours avec mes problèmes d'onglets
mais cette fois c'est diffférent
j'ai caché les onglets avec "outils/option/masquer les onglets"
mais une feuille de mon classeur a besoin de certains onglets (feuil 11 à 20) pour "fonctionner" (il faut que j'aille cliquer dans une cellule d'une de ces feuilles)
j'ai bien un bouton qui est sensé faire apparaitre les onglets
comment faire pour que ce bouton passe outre l'option coché plus haut pour les feuilles 11 à 20 uniquement
merci

 

[Staple1600]

Re : faire apparaitre certains onglets uniquement

Bonsoir

a tester

Sub rr()
For i = 1 To Sheets.Count
Select Case i
Case 11 To 20
Sheets(i).Visible = True
End Select
Next
End Sub