Affecter boutons macro à plusieurs onglets

Bonjour le forum

J'ai affecté un bouton macro à la feuille LEVET - LAGEDAMON

J'ai ce même bouton à tous les onglets mais ne sont plus affectés

Comment éviter de refaire plusieurs fois clic droit affecter macro?

Merci à vous

Bonjour,

Une piste à adapter :

Sub Test()

    Dim Fe As Worksheet

    For Each Fe In Worksheets

        Fe.Shapes(1).OnAction = "MaMacro"

    Next Fe

End Sub

Sub MaMacro()

    MsgBox "Le nom de la feuille d'où provient l'appel est : " & ActiveSheet.Shapes(Application.Caller).Parent.Name

End Sub

Bonjour Theze

SUPER

Merci à toi

Cordialement

Content de t'avoir aidé

Rechercher des sujets similaires à "affecter boutons macro onglets"