Référence à une macro

Bonjour,

J'ai fait une feuille avec pas mal de macros affectées à des boutons.

j'ai eu besoin de cette feuille pour un autre fichier Excel je l'ai donc copiée avec toute les macros.

le problème est que quand je clic sur un bouton il ouvre mon ancien fichier pour accéder à la macro.

je dois donc corriger tous les liens un pas un et j'en ai énormément.

il y a t'il une solution pour mettre à jour les liens en une fois.

Par avance merci pour votre aide

Bonjour,

Quel est le type des différents boutons?

Si ce sont des "shapes" (formes ou images...), tu peux essayer ce code :

Sub Reaffect_btn()
Dim Shp As Shape
Dim Pos_Ex As Long
For Each Shp In ActiveSheet.Shapes 'on balaie les shapes
    With Shp
        If .OnAction <> "" Then 'si une macro y est affectée
            Pos_Ex = InStr(1, .OnAction, "!") 'on cherche la positon du "!"
            If Pos_Ex > 0 Then 'si le ! existe (donc fait appel à un autre fichier)
                .OnAction = Right(.OnAction, Len(.OnAction) - Pos_Ex) 'on réaffecte en supprimant le nom du fichier
            End If
        End If
    End With
Next Shp
End Sub

Bon courage

Bonjour,

Super c'est juste ce qui me fallait.

Bonne continuation