I am printing a chart of accounts but would like to suppress the lines for
which there a no values, so that the report won't have all these zero
balances showing

Apply Autofilter to that column and choose Custom | Not equal to | 0
(zero).

It will hide the rows that contain 0 in that column, and then you can
print out. Select All from the filter pull-down after printing.

Hope this helps.

Pete

On Jan 31, 11:57*am, Conroy wrote:
I am printing a chart of accounts but would like to suppress the lines for
which there a no values, so that the report won't have all these zero
balances showing

Try the following macro (the zero values being in column A) :

Sub printWithoutZeroes()
Dim c As Range
For Each c In Range([A1], [A65000].End(xlUp))
If c = 0 Then c.EntireRow.Hidden = True
Next c
ActiveSheet.PrintPreview
Range([A1], [A65000].End(xlUp)).EntireRow.Hidden = False
End Sub

HTH
Daniel

I am printing a chart of accounts but would like to suppress the lines for
which there a no values, so that the report won't have all these zero
balances showing

I would use AutoFilter to "hide" rows with no information prior to printing
--
Gary''s Student - gsnu200830


"Conroy" wrote:

I am printing a chart of accounts but would like to suppress the lines for
which there a no values, so that the report won't have all these zero
balances showing