Hi Bryan
- put this code in a module of your workbook (see
http://www.mvps.org/dmcritchie/excel/getstarted.htm for instructions)
- after this goto 'Tools - Macro - Macros' and start this macro
P.S.: If you use a german Excel version use the menu 'Extras - Makro -
Makros'
--
Regards
Frank Kabel
Frankfurt, Germany
Hartsell wrote:
Frank,
Here's the code,
Private Sub Hide_Row()
Dim r As Long
Application.ScreenUpdating = False
With Worksheets("Sheet2")
For r = .UsedRange.Rows(.UsedRange.Rows.Count).Row To 5 Step
-1 If Application.CountA(Range(Cells(r, "C"), Cells(r,
"O"))) = 0 Then .Rows(r).Hidden = True
End If
Next
End With
Application.ScreenUpdating = True
End Sub
Is there some sort of step to activate it?
Thanks
Bryan
Grafenwoehr, Germany