::hide rows if value is 0::

[jekstein]

currently i have my code checking a specific cell and hiding if that cell = 0

example:

If Sheets("Total Sheet").Range("a7:a7").Select = 0 Then
    Rows("7").EntireRow.Hidden = True
    End If

I want to have my code check a range of cells and then if any of them = 0 i want it to hide the row its associated with.

Can anyone help me/??

THank you in advance

 

[Datsmart]

This worked on a text page I setup.

Sub HideRowBy2Criteria()
Dim rng As Range
Dim LastRow As Long
Dim I As Long

    'finds Row number of last used row in column E
    LastRow = Range("E" & Rows.Count).End(xlUp).Row

    'begin loop to check each row from bottom up
    For I = LastRow To 1 Step -1 ' change 1 to 2 if there's a header row
        Set rng = Range("E" & I)
        If rng.Value = "0" And rng.Offset(, 3).Value = "0" Then
            rng.EntireRow.Hidden = True
        End If
    Next I
End Sub

 

[brianpunx]

Thank you!!

Works perfectly!!