[VBA-E] problème avec le sendkeys

bonjour

j'utilise Excel 97 sous windows NT
le sendkeys rencontre des problèmes

je fais

Code:

---

1 2 3 4

Shell "C:\WINNT\system32\cmd.exe", vbMaximizedFocus Application.Wait Now + TimeValue("00:00:01") SendKeys ("c:\sitap.bat") & "{enter}"

---

souvent il ne saisie pas correctement "c:\sitap.bat"

des essais ont été fait sous windows 2000 et ca marche sans problème
d'ou vient le problème?

Il y a un autre argument de la fonction sendkeys. Peut-être devrait tu le mettre a 1.
Bon courage :wink:

merci pour vos reponses
mais ca ne marche pas

je resume mon problème
depuis Excel je dois lancer un programme via l'invite de commande dos.
Dans l'invite j'ai plusieurs info a saisir pour lancer le programme
j'ai crée un fichier bat puis j'execute ce fichier.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Open "c:\sitap.bat" For Output As #1 Print #1, Left(ZT_adresse, 2) Print #1, "cd " & Left(ZT_adresse, Len(ZT_adresse) - 1) Print #1, "(echo " & NomFichier Print #1, "echo" Print #1, "echo) > toto" Print #1, ZT_Sitap & " < toto" Close #1   returnvalue = Shell("C:\WINNT\system32\cmd.exe", vbMaximizedFocus) AppActivate returnvalue SendKeys "c:\sitap.bat" & "{enter}"

---

ZT_adresse,ZT_Sitap et NomFichier sont des zones de texte dans mon classeur Excel.

mais comme je l'ais dis il ne saisie pas correctement le nom du fichier.
si quelq'un sait comment faire :?:

Code:

---

1 2 3 4 5 6 7 8 9 10

Open "c:\sitap.bat" For Output As #1 Print #1, Left(ZT_adresse, 2) Print #1, "cd " & Left(ZT_adresse, Len(ZT_adresse) - 1) Print #1, "(echo " & NomFichier Print #1, "echo" Print #1, "echo) > toto" Print #1, ZT_Sitap & " < toto" Close #1   returnvalue = Shell("c:\sitap.bat", vbMaximizedFocus)

---

merci