Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Macro VBA pour impression sous Word

1 réponse
Avatar
taochy.ch
Sous word en VBA y-a-t-il une possibilité d'écrire une macro lors de son
execution pour configurer ( Propriétés ) l'imprimante en qualité
d'impression: Mode BROUILLON.
Car cela est possible en option impression ( case cochée ) mais les
graphismes ( Images ) ne s'impriment pas.
Merci pour votre aide et votre réponse.

1 réponse

Avatar
AB
Bonjour,
Pas bien compris ce que tu veux obtenir. En mode brouillon, les images ne
s'impriment pas : c'est normal. Que tu configures l'impression via un menu,
ou par VBA, je crains fort que le résultat soit le même. Pour imprimer en
mode brouillon, le code VBA t'est offert gracieusement par l'enregistreur de
macros (l'instruction concernée est .Printdraft = True) :
Sub Brouillon()
With Options
.DefaultTray = "Utiliser config. imprimante"
.PrintBackground = True
.PrintProperties = False
.PrintFieldCodes = False
.PrintComments = False
.PrintHiddenText = False
.PrintXMLTag = False
.PrintDrawingObjects = True
.PrintDraft = True
.PrintReverse = True
.MapPaperSize = True
.PrintOddPagesInAscendingOrder = False
.PrintEvenPagesInAscendingOrder = False
.PrintBackgrounds = False
End With
With ActiveDocument
.PrintPostScriptOverText = False
.PrintFormsData = False
End With
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="",
PageType:=wdPrintAllPages, _
ManualDuplexPrint:úlse, Collate:=True, Background:=True,
PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0,
_
PrintZoomPaperHeight:=0
AB


"t.ch" a écrit dans le message de
news:
mille excuse, Adresse e-mail expediteur incorrecte
Voici la bonne: , ou faire acte de reponse au meme message
réécrit plus haut.
"taochy.ch" a écrit dans le message de
news:
Sous word en VBA y-a-t-il une possibilité d'écrire une macro lors de son
execution pour configurer ( Propriétés ) l'imprimante en qualité
d'impression: Mode BROUILLON.
Car cela est possible en option impression ( case cochée ) mais les
graphismes ( Images ) ne s'impriment pas.
Merci pour votre aide et votre réponse.