VBA Filter Wildcard

VBA to filter an excel by a wildcard.   As long as the criteria term is within the cell it will be filtered.

Filter to show search term

rws = ActiveSheet.UsedRange.Rows.Count
Set FilterRng = ActiveSheet.Range("A1:Z" & rws)
FilterRng.AutoFilter Field:=1, Criteria1:="*searchTerm*" 'Field 1 = column A, Field 2 = column B

Filter to show everything but the search term

rws = ActiveSheet.UsedRange.Rows.Count
Set FilterRng = ActiveSheet.Range("A1:Z" & rws)
FilterRng.AutoFilter Field:=1, Criteria1:<>"*searchTerm*"
[efb_likebox fanpage_url="https://www.facebook.com/vbamarket/" box_width="840" box_height=340"" responsive="1" show_faces="1" show_stream="1" hide_cover="1" small_header="0" hide_cta="0" locale="en_US"]