Hi!
Does anyone here know how to go about filtering criteria based on three different columns, using xlFilterCopy from one worksheet to another?
I am using the code below now for 1 filter criteria, works great, but I need to filter 2 other additional columns... Does any one know how to mod this code to make this happen??
Your help will be appreciated.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 2 And Target.Column = 2 Then
Sheets("Parts Entry").Range("Criteria").Calculate
Worksheets("Parts Entry").Range("Database") _
.AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("Parts Entry").Range("Criteria"), _
CopyToRange:=Range("A6:K6"), Unique:=False
Sheets("Part Search").Range("B3").Calculate
End If
End Sub
Thank you in advance!
Does anyone here know how to go about filtering criteria based on three different columns, using xlFilterCopy from one worksheet to another?
I am using the code below now for 1 filter criteria, works great, but I need to filter 2 other additional columns... Does any one know how to mod this code to make this happen??
Your help will be appreciated.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 2 And Target.Column = 2 Then
Sheets("Parts Entry").Range("Criteria").Calculate
Worksheets("Parts Entry").Range("Database") _
.AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("Parts Entry").Range("Criteria"), _
CopyToRange:=Range("A6:K6"), Unique:=False
Sheets("Part Search").Range("B3").Calculate
End If
End Sub
Thank you in advance!