I have the following macro which automatically hides rows that contain blank cells within a given range of columns:
How to I edit the macro to make it select every other row from B to O? I need a macro that only looks at B,D,F,H,J,L, and N and then a second macro which looks at C,E,G,I,K,M, and O.![]()
Sub DeleteBlankRows() Dim lr As Long, i As Long lr = Cells(Rows.Count, "A").End(xlUp).Row For i = 4 To 26 If Application.CountBlank(Cells(i, "B").Resize(1, 14)) = 14 Then Rows(i).EntireRow.Hidden = True Else Rows(i).EntireRow.Hidden = False End If Next i End Sub
Thanks so much!
Bookmarks