I would like to add a "search" or "if contains" as an addition to my advanced filter set up as a macro. Right now it is processing if my search term (B3) is the first word in my range, however I am marking my list with tags and would like it the return results if other tag words if selected and not the first word in the range cell.
Example: B3 = cstore
Return: Cell example 1 [cstore, gpa, lottery, purchase, instore product, gas station] will return BUT NOT cell example 2 [transit, cstore, truckside, buswraps, commut]
How do I set up the below macro to also return cell 2? I need the ranges of A1:F200 and copy range of A5:F205 to stay the same as there is information between A through F that need to show as well.
<style type="text/css">p.p1 {margin: 0.0px 0.0px 0.0px 0.0px; font: 11.0px Menlo; color: #000000 ; background-color: #ffffff}p.p2 {margin: 0.0px 0.0px 0.0px 0.0px; font: 11.0px Menlo; color: #008f00 ; background-color: #ffffff}p.p3 {margin: 0.0px 0.0px 0.0px 0.0px; font: 11.0px Menlo; color: #011993 ; background-color: #ffffff}span.s1 {color: #011993 }span.s2 {color: #000000 }</style>Sub Go()
'
' Go Macro
'
' Keyboard Shortcut: Option+Cmd+g
'
Sheets("List").Range("A1:F200").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("$B$2:$B$3"), CopyToRange:=Range("A5:F205"), Unique:= _
False
End Sub
Thank you!!!
Example: B3 = cstore
Return: Cell example 1 [cstore, gpa, lottery, purchase, instore product, gas station] will return BUT NOT cell example 2 [transit, cstore, truckside, buswraps, commut]
How do I set up the below macro to also return cell 2? I need the ranges of A1:F200 and copy range of A5:F205 to stay the same as there is information between A through F that need to show as well.
<style type="text/css">p.p1 {margin: 0.0px 0.0px 0.0px 0.0px; font: 11.0px Menlo; color: #000000 ; background-color: #ffffff}p.p2 {margin: 0.0px 0.0px 0.0px 0.0px; font: 11.0px Menlo; color: #008f00 ; background-color: #ffffff}p.p3 {margin: 0.0px 0.0px 0.0px 0.0px; font: 11.0px Menlo; color: #011993 ; background-color: #ffffff}span.s1 {color: #011993 }span.s2 {color: #000000 }</style>Sub Go()
'
' Go Macro
'
' Keyboard Shortcut: Option+Cmd+g
'
Sheets("List").Range("A1:F200").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("$B$2:$B$3"), CopyToRange:=Range("A5:F205"), Unique:= _
False
End Sub
Thank you!!!