Set rgeCriteria = Range("A2:A4") Set rgeExtract = Range("C2") Range("B2").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=rgeCriteria, _
確定! 回上一頁