Discussion :

[tasaman]

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 :

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
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

[omen999]

bonjour,
si par "fonctions cachées" tu entends la possibilité de gérer plus finement les paramètres d'impression, il suffit de se reporter à la doc msdn.
La méthode PrintOut accepte au moins 19 paramètres facultatifs...

[tasaman]

Bonjour et merci pour ta réponse Omen,

Cette méthode Printout ne semble pas contenir les éléments que je souhaite configurer : je voudrais agrafer les documents.

Est-ce qu'il y a moyen de prendre la main directement sur l'imprimante avec un ActiveX ? au lieu de passer par Word.

Tasaman

[omen999]

Est-ce qu'il y a moyen de prendre la main directement sur l'imprimante avec un ActiveX ? au lieu de passer par Word.

pour gérer les options avancées d'une imprimante qui ne sont pas supportées nativement par VBA, 2 ou 3 possibilités :
- créer plusieurs noms d'imprimantes pointant vers la même imprimante physique avec différents pré-réglages
(pas toujours possible notamment avec les imprimantes réseau)
- modifier directement en mémoire les valeurs gérées par le driver au moyen d'appels API (un exemple ici) mais ça
suppose une connaissance des drivers spécifiques de l'imprimante (voir le support du fabricant)...
les spécialistes du VBA auront peut-être une idée
- le fabricant a écrit un activex ou une dll pour faciliter spécialement la gestion avancée de son imprimante (là encore voir le support)