Redirecionando a entrada para um executável do Excel VBA
Como você redireciona a entrada para um executável de dentro do VBA? Especificamente, por que o código abaixo não funciona?
ChDir theRightDirectory
Set WshShell = VBA.CreateObject("WScript.Shell")
WshShell.Run "runme < start.txt", 1, True
Ou
RetVal = Shell("runme < start.txt", vbNormalFocus)
runme.exe
inicia tudo bem, mas a entrada não é redirecionada e precisa ser digitada manualmente na janela de comando. Também tentei:
RetVal = Shell("type start.txt | runme.exe", vbNormalFocus)
Piping a saída detype start.txt
para dentrorunme.exe
simplesmente retorna um erro “arquivo não encontrado”.
No entanto, quando eu digito esses vários comandos diretamente na linha de comando, todos eles funcionam.