I am trying to hide a complete row if the cell in column A is blank for a given range. Reports is the name of the sheet I am working with. This code seems to run very slow, any idea how to speed it up?
This is what I am working with:
Dan
This is what I am working with:
Code:
Dim r As Integer
For r = 6 To 36
If Reports.Cells(r, 1) = "" Then Rows(r).EntireRow.Hidden = True
Next
Dan