Salut Dhany,
Merci pour ton retour rapide
Alors il me semble que l'évènement Private Sub Workbook_Open()
ne permet de lancer une macro qu'à l'ouverture du fichier où cette macro se trouve.
puis à tout hasard, regarde ce lien :
Eh bah super! J'ai modifié le code que j'y ai trouvé par :
Option Explicit
Public WithEvents App As Application
Private Sub App_WorkbookOpen(ByVal Wb As Excel.Workbook)
If InStr(1, Wb.Name, ".xl") >= 1 Then
MsgBox "Ouverture de fichier"
End If
End Sub
Private Sub Workbook_Open()
Set App = Application
End Sub
Placé dans le Module ThisWorkbook et fermé / ouvert le classeur dans lequel j'ai placé le code pour activé le Set App
Du coup, quand j'ouvre un fichier .xl (Donc Excel) j'ai bien un message
Merci encore !