L
Loulou
Guest
bonjour au forum, je recherche une macro à integrer dans un bouton pour imprimer ma feuille excel avec l'option broullion si possible.
Merci pour votre aide
Merci pour votre aide
Sub impressionNoirEtBlanc()
With Worksheets('Feuil1')
.pageSetup.blackAndWhite = True 'parametrage N&B
.printOut 'imprimer
.pageSetup.blackAndWhite = False'réinitialisation
End With
End Sub
PrintQuality, propriété
Cette propriété renvoie ou définit la qualité d'impression. Type de données Variant en lecture-écriture.
expression.PrintQuality(Index)
expression Obligatoire. Expression qui renvoie un objet PageSetup.
Index Argument de type Variant facultatif. Qualité d'impression horizontale (1) ou qualité d'impression verticale (2). Certaines imprimantes ne prennent pas en charge la qualité d'impression verticale. Si vous ne spécifiez pas cet argument, la propriété PrintQuality renvoie (ou peut être définie sur) un tableau à deux éléments qui contient la qualité d'impression horizontale et verticale.
Exemples
Cet exemple montre comment définir la qualité d'impression sur une imprimante avec des pixels non carrés. Le tableau indique à la fois la qualité d'impression horizontale et verticale. Cet exemple peut générer une erreur, selon le pilote d'imprimante que vous utilisez.
Worksheets('Sheet1').PageSetup.PrintQuality = Array(240, 140)
Cet exemple montre comment afficher le paramètre courant de la qualité d'impression horizontale.
MsgBox 'Horizontal Print Quality is ' & _
Worksheets('Sheet1').PageSetup.PrintQuality(1)