VBA Excel自动筛选列基于单元格内容

Question

ActiveSheet.Range("$A$1:$AK$5000").AutoFilter Field:=17, Criteria1:="<>"

我正在开发一个VBA项目，我需要自动过滤一个大字段。从上面的代码中可以看出，我正在过滤17字段或列。我希望代码查看单元格A1中的值以确定要过滤的字段/列。例如，如果单元格A1表示15我希望按字段15进行过滤。因此，如果我没有清楚自己，我想在代码中使用Field：=（Cell A1 Value）替换Field：= 17 ）

Answer 1

我遇到了同样的问题，并在此处找到了解决方案。如果有人来看，可能会有所帮助

使用Range对象的Column属性获取您感兴趣的特定单元格的列号。

在上述情况中：

ActiveSheet.Range("$A$1:$AK$5000").AutoFilter Field:=Range("A1").Column, Criteria1:="<>"