Página 1 de 1

VBA para abrir .cmd

Enviado: 30 Nov 2016 às 14:29
por mgTT
Gurus queridos!

Eu procurei na pqp toda da internet e fazem 2 dias que estou emperrado nisso.

Eu fiz uma planilha que extrai dados de um programa e cria txt's em uma pasta de 01 a 31 ( conforme os dias do mês ).
Tenho nesta mesma pasta um arquivo .cmd que unifica todos os arquivos de texto e cria um .csv para que depois eu importe esse csv para o excell.

O que eu quero fazer é que o excell execute o arquivo .cmd que eu tenho na pasta no meio de um código para que depois eu importe o arquivo que esse .cmd criou.

Isso é possível?

Já tentei, Shell, ShellExecute, Start, Open e outras coisas, mas fiquei preso nisso aqui.

Um grande abraço para todos e desde já o agradecimento pela ajuda e consideração.

Re: VBA para abrir .cmd

Enviado: 12 Dez 2016 às 16:13
por mgTT
Aew, pra quem interessar:
Código: Selecionar todos
Dim RetVal, A, fs
    
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set A = fs.CreateTextFile("caminho do arquivo", True)
    A.writeline "cd caminho do arquivo"
    A.writeline "type *.txt >> tudo.csv"
    A.Close
    
    RetVal = Shell("caminho do arquivo", 1)