Des de VBA ejecuto una bat usando Call Shell(...) y funciona correctamente.
Ahora necesito recoger la respuesta de esta bat, la cual tiene un "Echo respuesta".
¿Alguna idea de como hacer esto?
Gracias,
Stack Overflow en español es un sitio de preguntas y respuestas para programadores y profesionales de la informática. Solo te toma un minuto registrarte.
Regístrate para unirte a esta comunidadDes de VBA ejecuto una bat usando Call Shell(...) y funciona correctamente.
Ahora necesito recoger la respuesta de esta bat, la cual tiene un "Echo respuesta".
¿Alguna idea de como hacer esto?
Gracias,
Me han respondido en SO en Ingles. Respuesta Aquí
Adjunto una traducción.
No puedes devolver una respuesta usando Call Shell
. Necesitas usarWScript.Shell
.
Dim sh As Object
Set sh = CreateObject("WScript.Shell")
Dim ex As Object
Set ex = sh.Exec("C:\Directorio\A\Archivo.bat")
Dim ans As String
ans = ex.StdOut.ReadAll
De forma mas resumida, si quieres ahorrarte líneas:
Dim ans As String
ans = CreateObject("WScript.Shell").Exec("C:\Directorio\A\Archivo.bat").StdOut.ReadAll