Mise en forme avec VBA

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 2 Mars 2020

• #2

Bonjour Barnard,
Et si vous imprimez en noir et blanc ?
Je viens de tester sur la FICHE R1 : FICHE D'IDENTIFICATION ET RENSEIGNEMENTS DIVERS 1, ça marche impeccable.
Sauf si vous avez des champs qui doivent être en couleur à l'impression.

 

Vote positif 0 Vote négatif

B

barnard

XLDnaute Nouveau

• 2 Mars 2020

• #3

Oui j'ai des champs qui sont en couleurs raison pour laquelle je recherche la solution

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 2 Mars 2020

• #4

J'ai tenté ça et ça a l'air de marcher.
Le principe :
Je passe la page en blanc
J'imprime ( ici dans un pdf )
J'annule la dernière commande. On retrouve les couleurs.

VB:

Sub Blanc()
' Supprimer couleurs dans la page
    Range("C1:X65").Select
    With Selection.Interior
        .Pattern = xlNone
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
' Impression
    Application.ActivePrinter = "Microsoft Print to PDF sur Ne01:"
    ExecuteExcel4Macro _
        "PRINT(1,,,1,,,,,,,,2,""Microsoft Print to PDF sur Ne01:"",,TRUE,,FALSE)"
' Annuler la dernière commande, donc on retrouve les couleurs.
    Application.Undo
End Sub

Rien ne coûte d'essayer ... mais pas dans le fichier original.

 

Vote positif 0 Vote négatif

GALOUGALOU

XLDnaute Accro

• 2 Mars 2020

• #5

bonjour barnard bonjour le forum

mise en place d'une macro, qui avant l'impression sélectionne les cellules de couleur jaune, supprime la couleur.
j'ai choisi un aperçu avant impression. libre à vous de modifier. (supprimer l'avertissement de la macro)
en fin d'exécution la macro repose la couleur jaune à l'identique
surtout ne pas changer la teinte de la couleur jaune
cordialement
galougalou

 

Pièces jointes

• IMPRIMER COULEUR JAUNE.xlsm

  132.1 KB · Affichages: 8

Vote positif 0 Vote négatif

B

barnard

XLDnaute Nouveau

• 2 Mars 2020

• #6

Merci beaucoup pour cet code, il repond à mon besoin

GALOUGALOU à dit:

bonjour barnard bonjour le forum

mise en place d'une macro, qui avant l'impression sélectionne les cellules de couleur jaune, supprime la couleur.
j'ai choisi un aperçu avant impression. libre à vous de modifier. (supprimer l'avertissement de la macro)
en fin d'exécution la macro repose la couleur jaune à l'identique
surtout ne pas changer la teinte de la couleur jaune
cordialement
galougalou

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif

GALOUGALOU

XLDnaute Accro

• 2 Mars 2020

• #7

une petite précision
dans le vba il y a une macro qui vous permet de reposer la couleur jaune à l'identique si éventuellement vous auriez besoin de coloriser une autre cellule. (à associer avec un raccourci clavier)
@+

 

Vote positif 0 Vote négatif