再適用せずにオートフィルタを更新するためのVBAコード

Question

VBAでテーブルを更新しているときに、手動で再適用せずに自動フィルタを更新する方法はありますか？ A1の内容をクリアすると、VBAは列1のフィルタを自動的にクリアしてコードを再実行することができますか？または、A1の値を更新すると、column1のフィルタも自動的に更新される方法がありますか？

Iは、様々なソースから

Sub Name() 
ActiveSheet.AutoFilter.ApplyFilter 
End Sub 

と

Sub Name(ByVal Target As Range) 
Sheets("Sheet1").AutoFilter.ApplyFilter 
End Sub 

と

Sub Name(ByVal Target As Range) 
With ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1") 
    .AutoFilter.ApplyFilter 
End With 
End Sub 

を試みました。私はコードがフィルタモジュールと同じシートに埋め込まれていることを確認しましたが、私はまだ何か間違っているようです...どんな助けもありがとう！

ソースへのリンク：

https://www.extendoffice.com/documents/excel/4180-excel-refresh-filter-automatically.html https://superuser.com/questions/1004207/macro-for-reapply-filter-on-excel-2016 https://superuser.com/questions/249758/how-to-i-auto-refresh-an-excel-auto-filter-when-data-is-changed

Answer 1

は、リストダウン依存のドロップを使用して調べてください。サンプルファイルは、ここに記載されているURLの一番下にダウンロードできます。また

http://www.contextures.com/xlDataVal02.html

、ここからサンプルファイルをダウンロードしてください。

https://trumpexcel.com/dynamic-excel-filter/

最後に、以下、このリンクを形成するサンプルファイルをダウンロードしてください。 [ `Worksheet_Change（）`イベント]に

http://chandoo.org/wp/2015/08/22/filter-as-you-type-excel/