Discussion :

[rebreb]

Bonjour à tous,
je veux imprimer un document word, sans faire monter word à l'ecran.
ça marche presque nickel :
- j'ouvre word
- j'ouvre mon document
- j'imprime
- quand je veux faire mon close pour fermer word (de suite), il me met le message "des documents sont en cours d'impression ... si vous fermez word, ces documents ne seront pas imprimés).
Y aurait-il une solution pour attendre que word ait transmis le document en entier à l'imprimante avant de fermer ?

Voici mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
var
   OleApplication :variant;
   copie          : integer;
begin
     OleApplication := CreateOleObject('Word.Application');
     OleApplication.documents.open(e_lettre.text);
     copie:=StrToInt(e_nb_copies.text);
    OleApplication.printout(FileName:='',Range:=0,Copies:=copie,Collate:=True);
     OleApplication.Documents.Close;
end;

Merci d'avance.

[Laurent Dardenne]

Salut,
essaie
-d'apdapter ceci

Code :

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

1
2
3
4
 
If Options.PrintBackground = True Then
    jobs = Application.BackgroundPrintingStatus
End If

qui renvoie le nb de job d'impression en arriére plan.
- de tester avec Options.PrintBackground = False
- d'imprimer dans un fichier puis d'imprimer le fichier

Je n'ai jamais fait mais c'est ces qq pistes que j'explorerait au cas où.

[rebreb]

merci, je m'en vais tester ça...