Exécution d'une macro dès la création du fichier par copie

Bonjour à tous

J'ai un fichier avec une macro (fichier .xlsm).

Avec la commande "enregistrer sous" je crée un nouveau fichier identique au premier mais avec un autre nom.

Je voudrais faire s'exécuter de façon automatique cette macro dès la création de ce nouveau fichier.

Est-ce possible?

Merci de vos lumières

lmdr

Bonjour lmdr,

Voici une solution :

Private Sub Workbook_Open()
    If ThisWorkbook.Name <> [A1] Then
        Call macro
        [A1] = ThisWorkbook.Name
    End If
End Sub

Code à mettre dans le ThisWorkbook. Avant d'enregistrer, il faut que tu mettes le nom actuel de ton fichier (en incluant l'extension) en A1 d'une feuille (cellule à adapter). Cette manip n'est à faire qu'une fois pour toute.

Bonjour vba-new

Merci pour tes conseils

Ça fonctionne bien sauf que la macro ne s'exécute que si je ferme le fichier puis l'ouvre .

Quand de mon premier fichier je fais "enregistrer sous" et qu'il crée le nouveau fichier il est donc ouvert et la macro ne s'est pas exécutée.

Voilà encore de quoi réfléchir un peu.

Bonne soirée à tous

lmdr

Argh! Effectivement ! Je regarde si je peux faire quelque chose. Pas sûr d'y arriver !