Come si fa a cancellare automaticamente i filtri all’apertura, al salvataggio o alla chiusura della cartella di lavoro in Excel?

Supponiamo che la vostra cartella di lavoro contenga diversi fogli con dati filtrati. Per rimuovere tutti i filtri, dovreste controllare l’elenco filtrato in ciascun foglio e cancellarli manualmente uno per uno. È davvero fastidioso! In questo articolo vi mostreremo diversi metodi per cancellare automaticamente i filtri all’apertura, al salvataggio o alla chiusura di una cartella di lavoro in Excel.

Cancella i filtri all'apertura della cartella di lavoro in Excel
Cancella i filtri al salvataggio della cartella di lavoro in Excel
Cancella i filtri alla chiusura/uscita dalla cartella di lavoro in Excel

Cancella i filtri all'apertura della cartella di lavoro in Excel

Questa sezione illustra come rimuovere tutti i filtri da ogni foglio di lavoro all’apertura di una cartella. Seguite questa procedura.

1. Nella cartella di lavoro in cui desiderate cancellare automaticamente tutti i filtri all’apertura, premete i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic for Applications.

2. Nella finestra di Microsoft Visual Basic for Applications, fate doppio clic su ThisWorkbook nel riquadro sinistro Progetto, quindi copiate e incollate il seguente codice VBA nella finestra ThisWorkbook (Codice). Vedere lo screenshot:

Codice VBA: Cancella tutti i filtri all'apertura della cartella di lavoro

Private Sub Workbook_Open()
'Updated by Extendoffice 20221012
    Dim ws As Worksheet
    For Each ws In Worksheets
        If ws.AutoFilterMode Then
            ws.ShowAllData
        End If
    Next ws
End Sub

3. Premete i tasti Alt+Q per chiudere la finestra di Microsoft Visual Basic for Applications.

4. Fate clic su File > Salva con nome. Nella finestra di dialogo Salva con nome visualizzata, specificate una cartella in cui salvare la cartella di lavoro, assegnatele il nome desiderato nel campo Nome file, selezionate quindi l’opzione Cartella di lavoro abilitata per le macro di Excel dal menu a discesa Specifica formato di salvataggio, e infine fate clic sul pulsante Salva.

D’ora in poi, all’apertura di questa cartella di lavoro abilitata per le macro, tutti i filtri verranno rimossi automaticamente.

Sblocca la magia di Excel con KUTOOLS AI

• Esecuzione intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici, il tutto con comandi semplici e intuitivi.
• Formule personalizzate: crea formule su misura per ottimizzare i tuoi flussi di lavoro.
• Codifica VBA: Scrivi e implementa codice VBA in modo semplice e immediato.
• Interpretazione delle formule: Comprendi con facilità anche le formule più complesse.
• Traduzione del testo: Superate le barriere linguistiche direttamente nei vostri fogli di calcolo.

Potenzia le tue capacità in Excel con strumenti basati sull’intelligenza artificiale.Scarica orae scopri un’efficienza mai provata prima!

Cancella i filtri al salvataggio della cartella di lavoro in Excel

Potete rimuovere tutti i filtri dal foglio di lavoro corrente ogni volta che lo salvate.

1. Nella cartella di lavoro da cui desiderate cancellare automaticamente tutti i filtri, premete i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic for Applications.

2. Nella finestra di Microsoft Visual Basic for Applications, fate doppio clic su ThisWorkbooknel riquadro sinistro Progetto, quindi copiate e incollate il codice VBA seguente nella finestra ThisWorkbook (Codice). Vedere lo screenshot:

Codice VBA: Cancella i filtri al salvataggio della cartella di lavoro

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Updated by Extendoffice 20221012
    Dim ws As Worksheet
    For Each ws In Worksheets
        If ws.AutoFilterMode Then
            ws.ShowAllData
        End If
    Next ws
End Sub

3. Premete i tasti Alt+Qper chiudere la finestra di Microsoft Visual Basic for Applications.

D’ora in poi, al salvataggio della cartella di lavoro, tutti i filtri verranno rimossi automaticamente.

Cancella i filtri alla chiusura/uscita dalla cartella di lavoro in Excel

Nell’ultima sezione vi mostreremo come rimuovere tutti i filtri applicati nei vari fogli di lavoro al momento della chiusura o dell’uscita dalla cartella.

1. Aprite la cartella di lavoro da cui desiderate rimuovere automaticamente tutti i filtri, quindi premete i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic for Applications.

2. In Microsoft Visual Basic for Applications, fate doppio clic su ThisWorkbook nel riquadro sinistro Progetto, quindi copiate e incollate il seguente codice VBA nella finestra ThisWorkbook (Codice). Vedere lo screenshot:

Codice VBA: Cancella tutti i filtri nei vari fogli di lavoro alla chiusura/uscita dalla cartella di lavoro

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Dim ws As Worksheet
    For Each ws In Worksheets
        If ws.AutoFilterMode Then
            ws.AutoFilterMode = False
        End If
    Next ws
End Sub

Nota: se desiderate rimuovere solo i filtri nel foglio di lavoro corrente, utilizzate il seguente codice VBA.

Codice VBA: Cancella il filtro Foglio di lavoro attivo alla chiusura della cartella di lavoro

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Updated by Extendoffice 20221012
    Dim ws As Worksheet
    Set ws = ActiveSheet
        If ws.AutoFilterMode Then
            ws.ShowAllData
        End If
End Sub

3. Premete Alt+Q per chiudere la finestra di Microsoft Visual Basic for Applications.

D’ora in poi, tutti i filtri verranno cancellati automaticamente non appena si fa clic sul pulsante Chiudi nella cartella di lavoro.

Articoli correlati:

• Come si cancella la cache dei filtri (elementi obsoleti) da una tabella pivot in Excel?
• Come si fa a rimuovere i filtri da tutti i fogli di lavoro della cartella corrente in Excel?
• Come filtrare i dati in base a una casella di controllo in Excel?
• Come si fa a riempire una serie di numeri in una colonna di un elenco filtrato in Excel?

Migliori Strumenti per la Produttività in Office

🤖	KUTOOLS AI Assistente: Rivoluziona Analisi dei dati in base a:Esecuzione Intelligente   |  Genera Codice|  Crea formule personalizzate  |  Analizza Dati e Genera Grafici|  Richiama Funzioni avanzate…
	Funzionalità Popolari:Trova, Evidenzia o Contrassegna Duplicati   |  Elimina righe vuote   |  Combinare Colonne o Celle senza Perdere Dati   |   Arrotondamento senza usare la formula...
	Super RICERCA.VERT:VLookup con Criteri Multipli  |  VLookup con Valori Multipli  |   VLookup tra Fogli Multipli   |   Corrispondenza approssimativa....
	Elenco a discesa avanzato:Crea Rapidamente un Elenco a Discesa   |  Elenco a Discesa Dipendente   |  Elenco a Discesa con Selezione Multipla....
	Gestione Colonne:Aggiungi un Numero Specifico di Colonne|Sposta Colonne|Attiva/Disattiva lo Stato di Visibilità delle Colonne Nascoste|Confronta Intervalli e Colonne...
	Funzionalità in Evidenza:Attenzione della griglia   |  Visualizzazione Design   |Barra delle formule avanzata   | Gestione Cartelle di Lavoro e Fogli   |  Biblioteca di risorse(Testo Automatico)|  Selettore di Date   |  Unisci fogli di lavoro  |  Crittografa/Decrittografa celle   | Invia Email da Lista   |  Super Filtri   |   Filtro speciale(Filtra celle con testo in grassetto/corsivo/barrato...) ...
	Principali Set di Strumenti 15:12 Strumentiper il Testo(Aggiungi testo,Elimina Caratteri Specifici, ...)|   50+Tipidi Grafico(Diagramma di Gantt, ...)|   40+ Formule Pratiche(Calcola l'età in base alla data di nascita, ...)|   19 Strumentidi Inserimento(Inserisci Codice QR,Inserisci Immagine dal Percorso, ...)|   12 Strumentidi Conversione(Converti in parole,Conversione del tasso di cambio, ...)|   7 StrumentiUnisci e Dividi(Unione avanzata righe,Dividi celle, ...)|... e molto altro

Usa Kutools nella tua lingua preferita – supporta inglese, spagnolo, tedesco, francese, cinese e 40+ altre!

Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...

Maggiori dettagli su Kutools per Excel...Scarica Gratuitamente...

---

Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice

• Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
• Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
• Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!

Maggiori dettagli su Office Tab...Scarica Gratuitamente...

---

Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.

Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.

• Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
• Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
• Funziona meglio insieme— produttività ottimizzata tra le app di Office
• Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
• Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi

Maggiori dettagli su Kutools for Office...Scarica Gratuitamente...