Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Impression N et B avec zone grisée

Impression N et B avec zone grisée

5 réponses
Avatar
Michel
Bonjour.
J'ai cette procédure qui me permet d'avoir le choix entre une impression
couleur et noir et blanc.
Mais lorsque j'utilise le N et B, je n'ai plus les zones grisées
Comment dois-je faire afin d'avoir les zones grisée ?
Merci beaucoup
Michel

Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Unload Me
End Sub
Signaler un problème avec ce contenu

5 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
michdenis
Bonjour Michel,

Le format "Grisé" c'est un truc de word ... pas vu ça avec excel !
Tu appliques un format de cellules à ta plage ... Non ?


Salutations!


"Michel" a écrit dans le message de news:
Bonjour.
J'ai cette procédure qui me permet d'avoir le choix entre une impression
couleur et noir et blanc.
Mais lorsque j'utilise le N et B, je n'ai plus les zones grisées
Comment dois-je faire afin d'avoir les zones grisée ?
Merci beaucoup
Michel

Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Unload Me
End Sub
Avatar
Michel
Bonsoir Denis.
Lorsque la zone a un motif, et que l'impression se fait en N & B
normalement, on voit les zones grisées.
En revanche, lorsque je lance la proc suivante, on ne voit plus les zones
grisées !
Comment faire ?
Michel

Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Unload Me
End Sub





"michdenis" a écrit dans le message de news:

Bonjour Michel,

Le format "Grisé" c'est un truc de word ... pas vu ça avec excel !
Tu appliques un format de cellules à ta plage ... Non ?


Salutations!


"Michel" a écrit dans le message de
news:
Bonjour.
J'ai cette procédure qui me permet d'avoir le choix entre une impression
couleur et noir et blanc.
Mais lorsque j'utilise le N et B, je n'ai plus les zones grisées
Comment dois-je faire afin d'avoir les zones grisée ?
Merci beaucoup
Michel

Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Unload Me
End Sub





Avatar
michdenis
Bonjour Michel,

Selon moi, ce type de truc dépend du pilote de l'imprimante et de l'imprimante... je ne connais pas de code VBA qui
fasse expressément ce que tu demandes !


Salutations!



"Michel" a écrit dans le message de news:
Bonsoir Denis.
Lorsque la zone a un motif, et que l'impression se fait en N & B
normalement, on voit les zones grisées.
En revanche, lorsque je lance la proc suivante, on ne voit plus les zones
grisées !
Comment faire ?
Michel

Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Unload Me
End Sub





"michdenis" a écrit dans le message de news:

Bonjour Michel,

Le format "Grisé" c'est un truc de word ... pas vu ça avec excel !
Tu appliques un format de cellules à ta plage ... Non ?


Salutations!


"Michel" a écrit dans le message de
news:
Bonjour.
J'ai cette procédure qui me permet d'avoir le choix entre une impression
couleur et noir et blanc.
Mais lorsque j'utilise le N et B, je n'ai plus les zones grisées
Comment dois-je faire afin d'avoir les zones grisée ?
Merci beaucoup
Michel

Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Unload Me
End Sub





Avatar
Eric SEIGNEUR
Bonsoir

méthode basique (non évoluée mais qui peut dépanner). Si tu sais imprimer
correctement à la main (fichier, imprimer, ...) utilise la fonction sendkeys
(aide sous vba existe) par exemple :

SendKeys "^p{enter}", -1 >>>>>envoie un code ctrl P suivi de
entrée

Si tu regardes la séquence que tu effectues à la main, tu peux connaître l
asuite de codes à générer

A+
Eric


"michdenis" a écrit dans le message de news:

Bonjour Michel,

Selon moi, ce type de truc dépend du pilote de l'imprimante et de
l'imprimante... je ne connais pas de code VBA qui
fasse expressément ce que tu demandes !


Salutations!



"Michel" a écrit dans le message de
news:
Bonsoir Denis.
Lorsque la zone a un motif, et que l'impression se fait en N & B
normalement, on voit les zones grisées.
En revanche, lorsque je lance la proc suivante, on ne voit plus les zones
grisées !
Comment faire ?
Michel

Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Unload Me
End Sub





"michdenis" a écrit dans le message de news:

Bonjour Michel,

Le format "Grisé" c'est un truc de word ... pas vu ça avec excel !
Tu appliques un format de cellules à ta plage ... Non ?


Salutations!


"Michel" a écrit dans le message de
news:
Bonjour.
J'ai cette procédure qui me permet d'avoir le choix entre une impression
couleur et noir et blanc.
Mais lorsque j'utilise le N et B, je n'ai plus les zones grisées
Comment dois-je faire afin d'avoir les zones grisée ?
Merci beaucoup
Michel

Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Unload Me
End Sub










Avatar
Michel
Merci beaucoup à tous
Bonne soirée
Michel

"Eric SEIGNEUR" a écrit dans le message de news:

Bonsoir

méthode basique (non évoluée mais qui peut dépanner). Si tu sais imprimer
correctement à la main (fichier, imprimer, ...) utilise la fonction
sendkeys (aide sous vba existe) par exemple :

SendKeys "^p{enter}", -1 >>>>>envoie un code ctrl P suivi de
entrée

Si tu regardes la séquence que tu effectues à la main, tu peux connaître l
asuite de codes à générer

A+
Eric


"michdenis" a écrit dans le message de news:

Bonjour Michel,

Selon moi, ce type de truc dépend du pilote de l'imprimante et de
l'imprimante... je ne connais pas de code VBA qui
fasse expressément ce que tu demandes !


Salutations!



"Michel" a écrit dans le message de
news:
Bonsoir Denis.
Lorsque la zone a un motif, et que l'impression se fait en N & B
normalement, on voit les zones grisées.
En revanche, lorsque je lance la proc suivante, on ne voit plus les zones
grisées !
Comment faire ?
Michel

Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Unload Me
End Sub





"michdenis" a écrit dans le message de news:

Bonjour Michel,

Le format "Grisé" c'est un truc de word ... pas vu ça avec excel !
Tu appliques un format de cellules à ta plage ... Non ?


Salutations!


"Michel" a écrit dans le message de
news:
Bonjour.
J'ai cette procédure qui me permet d'avoir le choix entre une impression
couleur et noir et blanc.
Mais lorsque j'utilise le N et B, je n'ai plus les zones grisées
Comment dois-je faire afin d'avoir les zones grisée ?
Merci beaucoup
Michel

Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Unload Me
End Sub