+ -

2020-10-26

〔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/
※※ 本區做為經常使用之程式碼複製區，提問請至小講堂唷 ※※

5 章老師的電腦小講堂: 〔VBA〕AutoFilter-自動篩選指定值(部份符合)--v047    【自動篩選指定值- 部份 符合】 '若工作表有自動篩選，先行移除自動篩選設定 '依據範圍加入自動篩選       If Not ActiveSheet.AutoFilter Is Nothing Then ActiveSheet.AutoFilterMode...
小講堂經過多次搬移，舊文章連結及內容較難整理~
大家可以新文章為主~
每篇文章後有代碼，任何文章問題可至FB小講堂用代碼提問唷~