Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Imprime en B/W ou couleur Brigitte

B

brigitte

Guest
Bonsoir,

Aprés l'aide que j'ai eu la dernière fois, me revoila.
Je souhaiterais imprimer ma feuil1 qui est en couleur.
En noir et blanc ou en couleur, je souhaiterais que l'on puisse
faire le choix par une macro. Quels mots clés faut-il utilisé

Merci d'avance...

Brigitte
 
@

@Christophe@

Guest
Bonsoir Brigitte

Pour le noir et blanc, dans ta macro tu mets

With Feuille.PageSetup
.BlackAndWhite = True
End With

Pour le couleur c'est un print simple

@Christophe@
 
B

brigitte

Guest
bonsoir Christophe,

J'ai essayé, mais j'ai du faire un faux pas quelque part.
Ca ne fonctionne toujours pas.

voici ma macro:

Sub Macro1()
With Feuille.PageSetup
BlackAndWhite = True
End With
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

elle se bloque à la ligne With feuille.PageSetup

Brigitte
 
@

@Christophe@

Guest
Salut Brigitte

Essaye avec cette commande la

Sub imprimer()
Worksheets("Feuil1").PageSetup.BlackAndWhite = True
Worksheets("Feuil1").PrintOut Copies:=1, Collate:=True
End Sub

Cela vera imprimer en noir et blanc

@Christophe@
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…