Regarding AutoFilter field

[Mangolili]

w.Range("A1").AutoFilter field:=2, _
Criteria1:=CStr(availableFilters(currentFilterIndex))

How can i make the autofilter field more dynamic, not referring to specifically column to, but any column? Please help! Thank you so much.

 

[Comfy]

You would still need to specify the field Number.

Dim FieldNum As Long

FieldNum = Application.InputBox(Prompt:= _
                "Please Enter the Number of the column that you wish to Filter.", _
                    Title:="SPECIFY COLUMN", Type:=1)
If FieldNum > 0 Then
w.Range("A1").AutoFilter field:=FieldNum, _
Criteria1:=CStr(availableFilters(currentFilterIndex))
End If

 

[Mangolili]

Thank you so much, comfy. Will try out the code.