Come applicare lo stesso filtro a più fogli di lavoro in Excel?

Applicare la funzione Filtro per filtrare i dati in un foglio di lavoro può essere semplice, ma a volte potresti aver bisogno di filtrare più fogli di lavoro che presentano una formattazione dati comune utilizzando gli stessi criteri di filtro. Filtrarli uno per uno richiederebbe molto tempo; qui ti mostro un metodo semplice per risolvere tutto in una sola volta.

Applica lo stesso filtro a più fogli di lavoro con il codice VBA

Applica lo stesso filtro a più fogli di lavoro con il codice VBA

Ad esempio, ho quattro fogli di lavoro come mostrato nello screenshot che devono essere filtrati contemporaneamente con lo stesso criterio: Product = KTE.

Non esiste un modo diretto per filtrare i dati su più fogli di lavoro in Excel, ma il seguente codice VBA può aiutarti a completare questa operazione. Procedi come segue:

1. Tieni premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic for Applications.

2. Clicca su Inserisci > Modulo e incolla il seguente codice nella Finestra del Modulo.

Codice VBA: applica lo stesso filtro a più fogli di lavoro:

Sub apply_autofilter_across_worksheets()
'Updateby Extendoffice
    Dim xWs As Worksheet
    On Error Resume Next
    For Each xWs In Worksheets
        xWs.Range("A1").AutoFilter 1, "=KTE"
    Next
End Sub

3. Poi premi il tasto F5 per eseguire il codice: tutti i prodotti KTE verranno filtrati in tutti i fogli di lavoro contemporaneamente, come mostrato nello screenshot:

Nota: Nel codice sopra, nello script xWs.Range("A1").AutoFilter1, "=KTE", A1 e =KTE indicano rispettivamente la colonna e il criterio su cui vuoi basare il filtro; il numero1 rappresenta il numero della colonna da filtrare. Puoi modificarli secondo le tue esigenze. Ad esempio, se desideri filtrare gli ordini maggiori di50, ti basta modificare lo script in questo modo: xWs.Range("B1").AutoFilter2, ">50".