1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
Sujet Précédent Sujet Suivant

Lancer .exe dans powerpoint

Signaler
Messages postés
170
Date d'inscription
vendredi 16 janvier 2004
Statut
Membre
Dernière intervention
13 juin 2010
 -
Messages postés
125
Date d'inscription
lundi 6 septembre 2004
Statut
Membre
Dernière intervention
11 mai 2010
 -
marcod59
Bonjours à tous,

Quelqu'un sait-il comment lancer un .exe depuis VBA de powerpoint.
En sachant que la ligne suivante ne fonctionne pas :
Shell App.Path & "\fin.exe"

Merci d'avance
@+++

5 réponses

Réponse 1 / 5
Messages postés
125
Date d'inscription
lundi 6 septembre 2004
Statut
Membre
Dernière intervention
11 mai 2010
salut

chez moi ça marche en faisant sur le clic d'un bouton :
dim x as variant
x=shell(chemin de l'exécutable\exécutable)

chez moi si je fais application.path ça me renvoie le répertoire d'installation de powerpoint et pas celui où est enregistrée la présentation, ça doit être la cause de ton erreur...

à+
Réponse 2 / 5
Messages postés
170
Date d'inscription
vendredi 16 janvier 2004
Statut
Membre
Dernière intervention
13 juin 2010
marcod59

Exact, cette ligne fonctionne mais j'aimerais lancer le .exe depuis le dossier où il figure. Ceci même si quelqu'un à déplacé le dossier.

Merci pour ta réponse.
@+++
Réponse 3 / 5
Messages postés
125
Date d'inscription
lundi 6 septembre 2004
Statut
Membre
Dernière intervention
11 mai 2010
si quelqu'un a déplacé le dossier de l'exécutable je ne vois pas bien comment ta présentation pourrait en retrouver le chemin, à moins de balayer le disque dur jusqu'à le trouver...
ou alors tu parles du dossier de la présentation ? mais dans ce cas ma première réponse fonctionne...
Réponse 4 / 5
Messages postés
170
Date d'inscription
vendredi 16 janvier 2004
Statut
Membre
Dernière intervention
13 juin 2010
marcod59

Oui le .exe et le .ppt sont dans le même dossier et j'aimerais avoir la même fonction qui est utilisé en VB (Shell App.Path & "\fin.exe") qui ne fonctionne pas dans powerpoint.
Avec
dim x as variant
x=shell(chemin de l'exécutable\exécutable)
si le chemein de l'exe change cela ne fonctionne plus.

Merci
@+++
Réponse 5 / 5
Messages postés
125
Date d'inscription
lundi 6 septembre 2004
Statut
Membre
Dernière intervention
11 mai 2010
ça rejoint ce que je te dis :

- soit l'exécutable reste dans le repertoire du ppt et à ce moment tu peux coder en dur l'accès à l'exécutable avec x=shell(chemin de l'exécutable\exécutable),

- soit l'exécutable est dans un autre répertoire fixe et connu et à ce moment la même ligne fonctionne,

- soit l'exécutable est dans un chemin inconnu et à ce moment la
solution c'est de coder une recherche du chemin de l'exécutable avant
son exécution
Posez votre question