another way to hide all rows with a length 0 in col A
Sub hr()
For i = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
If Len(Cells(i, 1)) 0 Then Rows(i).Hidden = True
Next
End Sub

--
Don Guillett
SalesAid Software

wrote in message
oups.com...
Thanks for the info guys,
One more thing .....what if I wanted to hide the row where the contents
of col H is 5000 (numeric) or say "total" (or in fact any string).
As you may guess I'm still trying to get to grips with these types of
macros.

Once again thanks in advance