〔VBA〕AutoFilter-自動篩選指定值(部份符合)--v047

  

【自動篩選指定值-部份符合】

'若工作表有自動篩選，先行移除自動篩選設定

'依據範圍加入自動篩選

    If Not ActiveSheet.AutoFilter Is Nothing Then ActiveSheet.AutoFilterMode = False

    ActiveSheet.Range("$J$10:$R$2000").AutoFilter Field:=1, Criteria1:="=*" & Range("R7") & "*", Operator:=xlAnd

#範圍包含標題列
#條件前後加*為模糊查詢

相關課程：


章老師的電腦小講堂 https://www.facebook.com/ScenicSchool/

※※ 本區做為經常使用之程式碼複製區，提問請至小講堂唷 ※※