Discussion :

[samson_02]

Bonjour à toutes et à tous,

Je dois faire une macro en vba qui doit récuperer le chemin d'un fichier doc, qui est contenu dans une variable d'un fichier cmd. La variable est question est %1.
Je dois ensuite imprimer ce fichier .doc avec word, sans ouvrir le logiciel (en background). Pour être précis, c'est le fichier .cmd qui lancerait la macro vba de word 2003. Je dois préciser que ce n'est pas moi qui vais coder le fichier .cmd...
Quelqu'un pourrait-il m'aider sur ce coup svp, je ne vois pas comment procéder... merci d'avance

[Heureux-oli]

Salut,

Que veux-tu faire avec cette donnée ?

[samson_02]

Je veux récupérer la valeur (chemin du fichier à imprimer) afin de commander l'impression du document en vba dans word 2003. Je ne sais pas si je suis clair

[samson_02]

Bon... comme personne ne semblait vouloir indiquer une début de solution, je me suis débrouillé et ai trouvé la solution...

Voici les codes en question :

Pour le fichier .cmd qui appelle la macro vba dans word 2003...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
@echo off
set test= c:\test\monfichier.doc
echo votre fichier est %test%
echo.
start Winword.exe %test% /mautoexec

Pour le vba dans word...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Public Sub AutoExec()
 
Dim Appli As Word.Application
Dim objDoc As Word.Document
Dim chemin As String
 
chemin = (Environ("test"))   'Permet de récupérer la valeur de la variable d'environnement (%test%)
 
'MsgBox "" & chemin
 
Set Appli = GetObject(, "Word.Application")
Set objDoc = Application.Documents.Open("" & chemin)
objDoc.PrintOut
Appli.Quit
 
End Sub

Si ça peut aider quelqu'un....