check if two cells in the same row are empty, then hide row

[jimayers]

hello - originally i was trying to see if all cells in a row were empty then hide that row, but I was getting nowhere. Now I am trying to check just two cells, "A" and "E," and if they are empty then hide that row. here is what I have:

Sub hideBLANKRows()
Application.ScreenUpdating = False
Dim i, c1, c2 As Long
Dim Lastrow As Long
Lastrow = Cells(Rows.Count, "A").End(xlUp).Row
For i = 1 To Lastrow
c1 = Cells(i, "A")
c2 = Cells(i, "E")
If c1 = xlnull Then
If c2 = xlnull Then Rows(i).Hidden = True
Next
Application.ScreenUpdating = True
End Sub

Thanks for any help - Jim A

 

[My Aswer Is This]

Try this:

Sub Hide_Me()
Application.ScreenUpdating = False
Dim i As Long
Dim Lastrow As Long
Lastrow = Cells(Rows.Count, "A").End(xlUp).Row

    For i = 1 To Lastrow
        If Cells(i, 1).Value = xlnull And Cells(i, 5).Value = xlnull Then Rows(i).Hidden = True
    Next
Application.ScreenUpdating = True
End Sub

 

[My Aswer Is This]

If you want to check all columns for values and if all are empty try this script

Sub Hide_Me_All_Columns()
Application.ScreenUpdating = False
Dim i As Long
Dim Lastrow As Long
Lastrow = Cells(Rows.Count, "A").End(xlUp).Row

    For i = 1 To Lastrow
        If Application.CountA(Rows(i).EntireRow) = 0 Then Rows(i).Hidden = True
        
     Next

Application.ScreenUpdating = True
End Sub

 

[jimayers]

If you want to check all columns for values and if all are empty try this script

Sub Hide_Me_All_Columns()
Application.ScreenUpdating = False
Dim i As Long
Dim Lastrow As Long
Lastrow = Cells(Rows.Count, "A").End(xlUp).Row

    For i = 1 To Lastrow
        If Application.CountA(Rows(i).EntireRow) = 0 Then Rows(i).Hidden = True
        
     Next

Application.ScreenUpdating = True
End Sub

WOW...so simple too. I have been working on this for awhile. I just am having trouble with my syntax
Thanks - JA

 

[My Aswer Is This]

Glad I was able to help you. Come back here to Mr. Excel next time you need additional assistance.

WOW...so simple too. I have been working on this for awhile. I just am having trouble with my syntax
Thanks - JA