Mise en place d'un bouton sur tous les onglets

[Vilain]

Bonjour à tous,

J'ai une question très simple mais sur laquelle je me casse la tête depuis plusieurs dizaines de minutes déjà !
J'ai mis en place une macro que je souhaiterai pouvoir executer à partir de n'importe quel onglet de mon classeur. Est-il possible d'ajouter ce bouton sur les onglets que je souhaite (en gardant la même taille et la même position évidemment) ?

D'avance merci

 

[DoubleZero]

Re : Mise en place d'un bouton sur tous les onglets

Bonjour, Gillus69, le Forum,

Une suggestion dans le fichier joint.

A bientôt 🙂.

 

[Guest]

Re : Mise en place d'un bouton sur tous les onglets

Bonsoir,

Avec l'aimable consentement de 00🙂:

Pour créer les boutons sur toutes les feuilles dans la même macro.

Sub AjouterLesBoutons()
    For Each sh In ThisWorkbook.Worksheets
        With sh
            With .Buttons.Add(432, 26.4, 81, 25.2)
                .Characters.Text = "Macro Toto !"
                With .Font
                    .Name = "Arial"
                    .FontStyle = "Gras italique"
                    .Size = 10
                    .ColorIndex = 3
                End With
                .OnAction = "Toto"
            End With
        End With
    Next
End Sub
Sub Toto()
[A1] = "Résultat de la macro Toto !"
End Sub

A+

 

[DoubleZero]

Re : Mise en place d'un bouton sur tous les onglets

Re-bonjour,

... Avec l'aimable consentement de 00🙂 ...

Avec le talent de Hasco 😀, la chenille initialement proposée 😱 devient papillon 😀 !

Merci, Hasco 🙂.

A bientôt 🙂🙂

 

[Fo_rum]

Re : Mise en place d'un bouton sur tous les onglets

Bonsoir,

@h0h0* 🙂, j’aime bien tes boutons qui fleurissent tout le temps mais n’aime pas trop en fabriquer 😛.


Pour le fun et ceux qui veulent rester jeunes, une autre possibilité sans acné.

*tu es en avance pour les cadeaux (de Noël) qui tu offres 😉 !

 

[Vilain]

Re : Mise en place d'un bouton sur tous les onglets

Bonjour à tous, merci pour cet engouement,
cela correspond parfaitement à ce que je souhaitais.

Merci les amis !

 

[DoubleZero]

Re : Mise en place d'un bouton sur tous les onglets

Bonjour, le Fil 🙂, le Forum,

...Pour le fun et ceux qui veulent rester jeunes, une autre possibilité sans acné...

Une autre possibilité sans bouton, sans acné mais avec points noirs .......

Les goûts et les couleurs ne se discutent pas… 😛 🙂 😀 🙄 !