Printing of ZERO

  • Thread starter Thread starter Paul
  • Start date Start date
Do you mean this

The examples below will make the font color white.
1) It will make the font white
2) Print
3) Make the font black again

Sub test1()
'Range with one area
With ActiveSheet
.Range("B10:B14").Font.ColorIndex = 2
.PrintOut
.Range("B10:B14").Font.ColorIndex = 1
End With
End Sub

Sub test2()
'Range with more areas
With ActiveSheet
.Range("A1:A3,B10:B14,C12").Font.ColorIndex = 2
.PrintOut
.Range("A1:A3,B10:B14,C12").Font.ColorIndex = 1
End With
End Sub

I try to add some print tips on this page
http://www.rondebruin.nl/tips.htm
 
May be over simplified, but sort the lines so that ones you don't want
are isolated and use set print area to print the rest?
 
One more option:

Select your range and apply Data|Filter|Autofilter.

then use the dropdowns to show only the values (and rows) that you want to see.

Print the worksheet and do Data|Filter|showall (or even remove the autofilter).
 
Back
Top