I want to shade a cell but when I print it, I want it white.

[C. Mile]

The shading should be for viewing only.

 

[raypayette]

Place this in the Qorkbook module:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Range("A1").Select
Selection.Interior.ColorIndex = xlNone
End Su