VBA基於單元格內容的Excel自動篩選器列

Question

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

我正在處理一個需要自動篩選大型字段的VBA項目。從上面的代碼可以看出，我正在過濾17字段或列。我希望代碼查看單元格A1中的值以確定要過濾的字段/列。例如，如果單元格A1表示15，我想按字段15進行過濾。所以，如果我沒有讓自己清楚，我想在代碼中用字段替換Field = 17：=（Cell A1 Value ）

Answer 1

我有同樣的問題，這裏已經問過這個問題，並找出解決方案。可能是有幫助的，如果有人來找

使用範圍對象的列屬性，讓你有興趣在一個特定的單元格的列數

在上述情況下：

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