XL 2016 VBA, ne pas imprimer les mises en forme

cardi

XLDnaute Junior
Bonjour,

Je bloque sur mon code VBA.

J'ai créé une macro pour imprimer seulement certaines lignes (les lignes avec la valeur 0 dans la colonne "n" ne sont pas imprimées) :

VB:
Sub ImprimeSansVide()
Dim Plage As Range
On Error Resume Next
Application.ScreenUpdating = False
  With ActiveSheet
    Set Plage = .Range("n1:n1004")
       For Each CEL In Plage
        If CEL.Value = 0 Then Rows(CEL.Row).Hidden = True
     Next CEL
    .PrintPreview 'pour voir sans imprimer
       .Rows.Hidden = False
     End With
End Sub

Par contre, j'ai des mises en formes conditionnelles sur les lignes que j'imprime, les cellules sont avec un arrière plan de couleur rouge.

J'aimerai que quand je lance la macro, cela retire les mises en forme conditionnelles seulement pour l'impression et que cela les remette quand je quitte l'impression.

Pensez-vous que cela est possible?

Merci d'avance,

CARDI
 

Discussions similaires

Statistiques des forums

Discussions
312 220
Messages
2 086 381
Membres
103 199
dernier inscrit
ATS1