Autofilter VBA

[Sudarshan]

Hi,

I am using this macro below.

Sub AutofilterMatchDay()

Range("A4").AutoFilter Field:=8, Criteria1:=Range("F1").Value
Range("A4").AutoFilter Field:=9, Criteria1:=Range("G1").Value


End Sub

I would like it to modify to work as below:

If the cell is blank in F1 or G1 it should filter only the second range i.e G1 or F1 respectively.

Is this possible.

Thanks
Sudi

 

[Sam Mathai Chacko]

Just a wild guess

Sub AutofilterMatchDay()

If Not Isempty(Range("F1")) Then

Range("A4").AutoFilter Field:=8, Criteria1:=Range("F1").Value

End If

If Not Isempty(Range("G1")) Then

Range("A4").AutoFilter Field:=9, Criteria1:=Range("G1").Value

End If

End Sub

 

[Sudarshan]

Thanks SAM.. the tweak good with initial test.

Sudi