ActiveX - accés à l'imprimante
Bonjour,
Je cherche à piloter l'imprimante via un ActiveX pour définir des paramétres d'impression de document word.
J'utilise la fonction printOut pour imprimer :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
| Public Sub Imprimer()
Dim WordApp As Object
Dim fileName As String
Dim doc As Document
Dim verif
fileName = "c:\MonDocument.doc"
Set WordApp = CreateObject("Word.Application")
' Create a new document
Set doc = WordApp.Documents.Open(fileName)
' Make Word visible through the Application object
WordApp.Visible = True
verif = WordApp.PrintOut
verif = WordApp.ActiveDocument.Close
WordApp.Quit
' Clear the object from memory
Set WordApp = Nothing
End Sub |
Je n'ai rien vu dans le msdn de microsoft, dc si il y a des fonctions d'impression 'cachées' je suis preneur ;)
Tasaman
