高度なフィルタが機能しないVBA

高度なフィルタを実行しようとしていますが、実行するとデータが非表示になります。高度なフィルタが機能しないVBA

Sub AdvancedFilter() 
' 
' AdvancedFilter Macro 


Range("E34").Select 
    Range("E34:P" & Range("P" & Rows.Count).End(xlUp).Row).AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _ 
     Sheets("Rules").Range("B3:M4"), Unique:=False 
End Sub

したがって、私のルール（同じヘッダー）が添付されていて、データが必要な場所に添付されています。

出典

2016-11-02 Leandro Moreira

「ルール」に条件が指定されていないようです。それは意図的なのでしょうか？ – YowE3K

My Criteriaはシートルールの範囲B3：M4です。しかし私はチャンスを作ったし、今働いているようだ。とにかくありがとうございます –

基準（つまり、セルB4：M4）が完全に空白であるため、何かをフィルタリングしないという意味です。しかし、今は動作している限り、それはすべて重要です。 – YowE3K

あなたが別のワークシートにデータをコピーする"Action:=xlFilterCopy"に"Action:=xlFilterInPlace"を変更しようとしています。あなたのメソッドはそれを適所にフィルタリングするので、データを隠し、基準によってフィルタリングされたデータのみが表示されます。

出典

2017-07-17 11:25:46 user8125557

高度なフィルタが機能しないVBA

答えて

関連する問題