Buongiorno, vorrei creare un pulsante facilitato per azzerare il filtro, come se manualmente una volta filtrato il criterio che mi interessa cliccassi su un field a caso e selezionassi ( tutto ).
Utilizzo alternativamente i Field 2,3,5 e per ora ho provato la seguente macro che, "funziona"
- Codice: Seleziona tutto
Sub Resetta_Filtro()
Dim I As Integer
For I = 1 To Columns.Count
Selection.AutoFilter Field:=I
Next
End Sub
Mi spiego, eseguendo la macro, ottengo il risultato, il filtro si resetta ma la macro restituisce l'errore 1004 autofilter per la classe range.
Saluti !!
