[VBA]Exécuter une commande Shell

Bonjour,

je souhaite exécuter une commande shell depuis le code VBA. Il s'agit de lancer un script .bat contenant un code dans ce style :

Code:

---

1 2	cd U:\dir\ prog -a fichier_sortie.txt

---

Sachant que la base est dans le dossier U:\dir\ et que l'exécutable "prog" aussi est dans ce fichier. Lorsque je double clic sur mon script.bat les actions se font normalement. Le problème c'est que cela ne fonctionne plus lorsque je lance la commande depuis le code VBA de la manière suivante :

Code:

---

1 2	Dim ret As Long ret = Shell("U:\dir\script.bat", 1)

---

La fenêtre de commande s'ouvre mais le script ne se lance pas...

Comment résoudre ce problème ?

merci d'avance
antoine

Essaye ceci.

Code:

---

Shell ("cmd /c c:\toto.bat")

---

Cordialement,

Bonjour,
je relance ce post car j'ai le même problème et la solution proposée ne fonctionne pas.

Je récapitule : mon fichier .bat fonctionne très bien
Par contre quand j'essaie de le lancer via VBA en utilisant l'instruction Shell, je n'ai aucun résultat, ni message d'erreur. :(

Please help !




Je précise que je travaille avec un PC surlequel je n'ai pas tous les droits (réseau d'entreprise oblige !). Est-ce qu'on peut imaginer que les admins aient bloqué ce genre de manip ?
>> Etant donné que mon fichier .bat s'exécute je ne pense pas... mais bon je ne suis pas spécialiste.

Je pense que tu dois mapper ton U dans la commande .bat
Essai de faire un dir u:\ dans un cmd et de le lancer par vba pour voir s'il a acces au U

Personnellement je procéde ainsi...

Code:

---

1 2 3 4

Dim Commande as string Commande = "c:\base97\system\CopyDB.bat" Shell Commande

---

en espérant aider...

fevec