Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/27.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
用于更新自动过滤器而无需重新应用的VBA代码_Vba_Excel_Autofilter - Fatal编程技术网

用于更新自动过滤器而无需重新应用的VBA代码

用于更新自动过滤器而无需重新应用的VBA代码,vba,excel,autofilter,Vba,Excel,Autofilter,使用VBA更新表格时,是否有方法刷新自动过滤器而无需手动重新应用它?比如说,A1中有一个值用作表1第1列的过滤器。当我清除A1中的内容时,VBA是否可以在不重新执行代码的情况下自动清除第1列中的过滤器?或者,如果我更新A1的值,是否有一种方法可以自动更新column1的过滤器 我试过了 Sub Name() ActiveSheet.AutoFilter.ApplyFilter End Sub 及 及 来自不同的来源。我确保代码与过滤器模块嵌入在同一张表中,但我似乎仍然做了一些错误的事情。。。任

使用VBA更新表格时,是否有方法刷新自动过滤器而无需手动重新应用它?比如说,A1中有一个值用作表1第1列的过滤器。当我清除A1中的内容时,VBA是否可以在不重新执行代码的情况下自动清除第1列中的过滤器?或者,如果我更新A1的值,是否有一种方法可以自动更新column1的过滤器

我试过了

Sub Name()
ActiveSheet.AutoFilter.ApplyFilter
End Sub

来自不同的来源。我确保代码与过滤器模块嵌入在同一张表中,但我似乎仍然做了一些错误的事情。。。任何帮助都将不胜感激

链接到来源:


查看使用依赖下拉列表。您可以在此处列出的URL底部下载示例文件

另外,从这里下载示例文件

最后,从下面的链接下载示例文件


查看使用依赖下拉列表。您可以在此处列出的URL底部下载示例文件

另外,从这里下载示例文件

最后,从下面的链接下载示例文件


调查一个问题。我会这样做,然后再给你回复。谢谢!:)调查一下,我会做的,然后再打给你。谢谢!:)嗯,这是一个有趣的方法!实际上,我在同一个电子表格中使用它来做其他事情,但我从来没有想过要这样使用它。谢谢您的输入,我将尝试此功能。:)如果我的回答确实帮助您解决问题,请将其标记为有帮助。谢谢。嗯,这是一个有趣的方法!实际上,我在同一个电子表格中使用它来做其他事情,但我从来没有想过要这样使用它。谢谢您的输入,我将尝试此功能。:)如果我的回答确实帮助您解决问题,请将其标记为有帮助。谢谢
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