テーブルから条件を指定して抽出する Worksheets("").Range("").AdvancedFilter _'テーブルを指定 Action:=xlFilterCopy, _ CriteriaRange:=Worksheets("").Range(""), _'抽出条件がある範囲を指定 CopyToRange:=Worksheets("").Range(""), _'抽出先を指定 U…