On Fri, 11 Jul 2008 08:15:01 -0700, lightbulb
wrote:

I have formulas in consecutive rows, but I want to run a macro that will hide
the rows that equal 0, and if they change and don't equal 0, the row will
unhide. Is there a code for this? (I'm using Excel 2003)

Thanks!


Try this:

Private Sub Worksheet_Change(ByVal Target As Range)
maxrownumber = 100
column_to_test = 1
For i = 1 To maxrownumber
If Cells(i, column_to_test).HasFormula Then
Rows(i).EntireRow.Hidden = (Cells(i, 1) = 0)
End If
Next i
End Sub

You can play with the maxrownumber and column_to_test to suit your
needs.

Hope this helps / Lars-Åke