VBA If Statement to Filter out "0" zero value

[gheyman]

I have code that will filter to a specific value but I need to filter out "0" from the identified table column (I dont want to show the rows that have 0 value)


Code that filters to a specific value

Sub FilterRanges()

If Range("D9").Value = Range("O15").Value Then

 With ActiveSheet.ListObjects("ProPricer_Quote_Data_Merged")
    .Range.AutoFilter Field:=.ListColumns("50q74").Index, Criteria1:=Range("C8").Value
  End With
End

Else

End If


End Sub

I tried recording a macro but I got a message saying there was too many values and the macro stoped

Any help is appreciated.

 

[Joe4]

Can you show us a small sample of your data?
What column is the "zero" filter to be applied to?

 

[gheyman]

Joe

Here is what I came up with that seems to work

If Range("D9").Value = Range("K15").Value Then

With ActiveSheet.ListObjects("ProPricer_Quote_Data_Merged")
.Range.AutoFilter Field:=.ListColumns("1q4").Index, Criteria1:="<>0", Operator:=xlFilterValues
End With
Else