VBA to turn on AutoFilter even if already on

[General Ledger]

I want code to turn on the AutoFilter. The code I have below acts more like a toggle. If AutoFilter is off, this code turns it on. If AutoFilter is on, this code turns it off.

Is there code that turns on AutoFilter regardless of the current state?

    Range("A1:I1").AutoFilter

 

[wigi]

Use a code snippet from this web page and I'm almost sure it will be solved:

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

 

[General Ledger]

Perfect Solution!

This code checks the state of AutoFilter. If off, turn it on. If on, leave it on.

    If Not ActiveSheet.AutoFilterMode Then
        ActiveSheet.Range("A1:I1").AutoFilter
    End If

Thanks wigi!