Bonjour,
Dans une macro j'appelle une application externe.
Pour ça j'utilise le simple code :
Le chemin d'accès c'est : C:\"Program Files\fichier.exe". Mais je travaille sur des Ordis avec différentes langues et différents répertoires d'installation par défaut des nouveaux prog.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Sub Launch_appli Dim Retval Retval = Shell("C:\CHEMIN_ACCES\NOM_DU_FICHIER.exe") End Sub
Donc je recherche un code qui permet de trouver automatiquement le répertoire par défaut d'installation des programmes.
Pour détecter le répertoire temporaire par défaut j'utilise le code suivant qui marche très bien.
Je n'ai pas trouvé une fonction similaire pour le répertoire d'installation des progrs. Vous en connaissez une ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Function GetTempDir() As String Dim buffer As String * 256 Dim Length As Long Length = GetTempPath(Len(buffer), buffer) GetTempDir = Left(buffer, Length) End Function
Merci d'avance,
Arnaud
Partager