Afficher Onglets par Double Clic cellule B2

Bonjour le forum

Je voudrais par double clic faire afficher les onglets cellule B2

Merci à vous

Sub AfficherOnglets()

Application.ScreenUpdating = False

Dim Onglets As Worksheet

For Each Onglets In Worksheets

Onglets.Visible = True

Next Onglets

Application.ScreenUpdating = True

End Sub

Bonjour Al87 le forum

afficher les onglets cellule B2

Tu pourrais nous traduire ou t'exprimer clairement STP???

Si encore tu avais joint un fichier on aurait peut-être pu comprendre en cherchant ce que tu veux mais là??

ou peut-être que tu veux qu'en double cliquant sur la cellule B2, tu souhaites afficher tous les onglets??

a+

Papou

Bonjour paritec

En double clic cellule B2 faire afficher les onglets

Fichier joint

Cordialement

3toto-1.zip (72.78 Ko)

Re bonjour Al87 le forum

voilà

a+

Papou

Re bonjour Al87 le forum

voilà et avec la désactivation du rafraichissement d'écran

a+

Papou

Re paritec le forum

Super encore un GRAND merci

Bien cordialement à toi

Rechercher des sujets similaires à "afficher onglets double clic"