Bonjour,

j'ai réalisé une macro pour lancer un .exe se trouvant dans le même dossier que mon fichier excel.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sub Executable()
 
    Dim strProgramName As String
 
    strProgramName = ThisWorkbook.Path & "\application.exe"
 
    Call Shell("""" & strProgramName & """", vbNormalFocus)
 
End Sub
Le problème était que dans un premier temps, cette application .exe ne se lançait, via la macro, que lorsque je fais "enregistrer sous" au préalable ; certainement que cela me permet de définir le dossier dans lequel je travaille.

J'ai donc rajouté un ChDir (ThisWorkbook.Path) en haut de mon code pour définir le dossier de travail et tout marchait parfaitement...

Malheureusement, j'ai déplacé mon dossier de travail (qui contient .exe et fichier excel) d'emplacement et j'ai de nouveau le même problème, même avec la commande ChDir en amont. Je dois faire "enregistrer sous" avant de lancer ma macro pour que cette dernière puisse lancer correctement le .exe....

Pouvez-vous m'aider svp ?

Bien cordialement.

Nicolas