Bonjour,

J'aimerais savoir comment je pourrais lancer la console CMD, écrire du texte dedans et faire ENTER Depuis VBA bien sur.

Voila comment j'ouvre mon programme :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Sub test()
 
Dim ret As Variant
ret = Shell("C:\Program Files\GNU\Cygwin1.5\cygwin.bat", vbNormalFocus)
 
End Sub
Pour info Cygwin est un émulateur C. Ce que je voudrais c'est qu'une fois le fichier ouvert je puisse via VBA écrire à l'intérieur.
Mon objectif étant de lancer une commande Grep.
Si je devais faire un (lamentable) essaie j'essaierais ce type de commande :


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Sub test()
 
Dim ret As Variant
ret = Shell("C:\Program Files\GNU\Cygwin1.5\cygwin.bat", vbNormalFocus)
 
ActiveWindow.WriteLine = "Cd /cygdrive/r" '[ENTER] Afin de permettre au programme de s'orienter dans les fichiers
ActiveWindow.WriteLine = "grep ABC totot.txt" >> C:/resultat.txt '[ENTER]
End Sub
Auriez vous une idée de script qui me permettrais de réaliser cette opération ?

Merci beaucoup