The user found some VBA to hide all rows that do not have any results greater than a zero in them.
For example rows 1 and 3 below should be hidden whilst rows 2 and 4 should still be visible..
Unfortunately, not being a coder the user can't work out why it won't work.
The user has attached the .xlsm w/book.
Sub HideRows() Dim r As Long For r = 4 To Cells(Rows.Count, "A").End(xlUp).Row If Application.WorksheetFunction.CountIf(Range("D" & r & ":J" & r), ">0") = 0 Then Rows(r).Hidden = True Next r End Sub
Obtained from the OzGrid Help Forum.
Solution provided by Carim.
|How to count blanks if 1 of 2 conditions are met|
|How to use conditional format to highlight the blank cells|
|How to print range excluding blank rows with formulas|
|How to count non blanks 5 years from the last non blank date|