Bonjour à tous,
Débutant en VBA j'aurais besoin de votre aide,
J'ai creer deux boutons afin de permettre à l'utilisateur de choisir l'imprimante à utilisé (difference de feuille dans les imprimantes).
Les documents s'imprime correctement sur les bonnes imprimantes.
Le problème vient que le texte est brut, sans aucune mise en forme.
De plus je souhaiterai imprimé que la 1er page.
Merci d'avance pour votre aide
Débutant en VBA j'aurais besoin de votre aide,
J'ai creer deux boutons afin de permettre à l'utilisateur de choisir l'imprimante à utilisé (difference de feuille dans les imprimantes).
Code:
Private Sub CommandButton1_Click()
Dim oldPrinter As String
oldPrinter = Application.ActivePrinter
Application.ActivePrinter = "\\serveur\local_1"
ActiveDocument.PrintOut
DoEvents
Application.ActivePrinter = oldPrinter
End Function
Les documents s'imprime correctement sur les bonnes imprimantes.
Le problème vient que le texte est brut, sans aucune mise en forme.
De plus je souhaiterai imprimé que la 1er page.
Merci d'avance pour votre aide