Lancer un exécutable depuis Excel par macro (ou au pire d'un lien hypertexte?)
Bonjour à tous,
je souhaiterais pouvoir lancer un executable depuis mon fichier excel mais sans utiliser un chemin direct (C:\etc...) mais en fonction du dossier où se trouve le fichier excel.
J'ai donc créé la macro suivante mais rien ne se passe :
Code:
1 2 3 4 5 6 7 8 9 10
| Sub Executable()
Dim retval
Dim Chemin As String
Chemin = """" & ThisWorkbook.Path & "\TTT test.exe" & """"
'MsgBox Chemin
retval = Shell(Chemin)
End Sub |
Je me suis dit que bon, tant pis, j'allais créer un lien hypertexte vers l'exécutable mais là non plus cela n'a pas marché... dans les 2 cas, une fenêtre de commande s'ouvre et se referme instantanément.
Pourriez-vous m'aider ?
Merci d'avance
Cordialement. Nicolas149