excel SORTING HIDING WITH VBA

[Youseepooo]

hello

i have a code that works fine but id like to adjust it to add another criteria. I want to hide rows in Column "F5:F171" if they read "Inactive". It is currently hiding based on Yes/no in Column G just fine . I just want to hide based on 2 conditions.

Thanks

Sub sort_updated()

'removes No from Column G
Sheets("Log").Select
    Dim xRg As Range
    Application.ScreenUpdating = False
        For Each xRg In Range("g5:g420")
            If xRg.Value = "No" Then
                xRg.EntireRow.Hidden = True
            Else
                xRg.EntireRow.Hidden = False
            End If
        Next xRg
    Application.ScreenUpdating = True
    
End Sub

 

[Fluff]

What happens if G7=Yes 7 F7=Inactive, should that row be hidden?
Also what happens if the reverse is true?

 

[DanteAmor]

Try this

Sub sort_updated()


'removes No from Column G
    Sheets("Log").Select
    Dim xRg As Range
    Application.ScreenUpdating = False
    For Each xRg In Range("g5:g420")
[COLOR=#0000ff]        If xRg.Value = "No" And xRg.Offset(, -1) = "Inactive" Then[/COLOR]
            xRg.EntireRow.Hidden = True
        Else
            xRg.EntireRow.Hidden = False
        End If
    Next xRg
    Application.ScreenUpdating = True
    
End Sub

 

[Youseepooo]

No if G reads "Yes" and F reads "Inactive" then it should be hidden. I want it to be governed by G. Good question man!
Thanks

 

[Youseepooo]

its running but it isnt doing anything. Seems like it should work im confused..

 

[Youseepooo]

I tried restarting excel and my computer, its not running correctly. but it is running just not hiding rows with"Inactive" in f and No in G

 

[Youseepooo]

i actually think the process should be done as follows:
all values of "Yes" in Column G should appear filtered on the top and hide all rows with Inactive in Column F. SO instead of having to hide based on two criteria which seems to be more tricky, could you help me filter the yes to appear on top of the list while hiding all in active in column F.

 

[Fluff]

Still not sure entirely what your after, but how about

Sub sort_updated()

'removes No from Column G
Sheets("Log").Select
    Dim xRg As Range
    Application.ScreenUpdating = False
        For Each xRg In Range("g5:g420")
            If xRg.Value = "No" Or LCase(xRg.Offset(, -1)) = "inactive" Then
                xRg.EntireRow.Hidden = True
            Else
                xRg.EntireRow.Hidden = False
            End If
        Next xRg
    Application.ScreenUpdating = True
    
End Sub

 

[Youseepooo]

lol how do u say u are not entirely sure what im after then your code runs perfect. haha
Thanks dude good work just what i wanted.

 

[Fluff]

Glad we could help & thanks for the feedback