Come cancellare i filtri durante l'apertura, il salvataggio o la chiusura della cartella di lavoro in Excel?
Supponiamo di avere più fogli di lavoro contenenti dati filtrati nella cartella di lavoro. Per cancellare tutti i filtri, è necessario controllare l'elenco filtrato in diversi fogli di lavoro e quindi cancellarli manualmente uno per uno. Questo è fastidioso! In questo articolo, ti mostreremo diversi metodi per cancellare i filtri durante l'apertura, il salvataggio o la chiusura di una cartella di lavoro in Excel.
Cancella i filtri all'apertura della cartella di lavoro in Excel
Cancella i filtri durante il 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 parla della cancellazione dei filtri in tutti i fogli di lavoro quando si apre una cartella di lavoro. Si prega di fare quanto segue.
1. In una cartella di lavoro è necessario cancellare automaticamente tutti i filtri all'apertura, premere il tasto altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare doppio clic Questa cartella di lavoro sulla sinistra Progetto riquadro, quindi copia e incolla il codice VBA sottostante nel file ThisWorkbook (codice) finestra. Vedi 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. premi il altro + Q tasti per uscire da Microsoft Visual Basic, Applications Edition finestra.
4. Clic Compila il > Salva con nome. Nel spuntare Salva con nome finestra di dialogo, specificare una cartella per salvare questa cartella di lavoro, denominarla come necessario nel file Nome del file casella, quindi selezionare Cartella di lavoro abilitata per Excel opzione dal Salva come tipo elenco a discesa e infine fare clic su Risparmi pulsante.
D'ora in poi, quando apri questa cartella di lavoro con abilitazione macro, tutti i filtri in questa cartella di lavoro verranno cancellati automaticamente.
Cancella i filtri durante il salvataggio della cartella di lavoro in Excel
Puoi cancellare tutti i filtri dalla cartella di lavoro corrente ogni volta che la salvi.
1. Nella cartella di lavoro è necessario cancellare automaticamente tutti i filtri, premere il tasto altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare doppio clic Questa cartella di lavoro sulla sinistra Progetto riquadro, quindi copia e incolla il codice VBA sottostante nel file ThisWorkbook (codice) finestra. Vedi screenshot:
Codice VBA: cancella i filtri durante il 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. Stampa altro + Q tasti per uscire da Microsoft Visual Basic, Applications Edition finestra.
D'ora in poi, quando si salva la cartella di lavoro, tutti i filtri verranno cancellati automaticamente.
Cancella i filtri alla chiusura / uscita dalla cartella di lavoro in Excel
L'ultima sezione, ti mostreremo come cancellare tutti i filtri nei fogli di lavoro quando si chiude o si esce dalla cartella di lavoro.
1. Aprire la cartella di lavoro da cui eliminare automaticamente tutti i filtri, quindi premere il tasto altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare doppio clic Questa cartella di lavoro sulla sinistra Progetto riquadro, quindi copia e incolla il codice VBA sottostante nel file ThisWorkbook (codice) finestra. Vedi screenshot:
Codice VBA: cancella tutti i filtri sui fogli di lavoro quando si chiude / esci 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
Note:: Se desideri solo cancellare i filtri nel foglio di lavoro corrente, utilizza il codice VBA sottostante.
Codice VBA: cancella il filtro nel foglio 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. Stampa altro + Q tasti per uscire da Microsoft Visual Basic, Applications Edition finestra.
D'ora in poi, tutti i filtri verranno cancellati automaticamente dopo aver fatto clic sul pulsante Chiudi nella cartella di lavoro.
Articoli correlati:
- Come cancellare la cache dei filtri (vecchi elementi) dalla tabella pivot in Excel?
- Come cancellare i filtri da tutti i fogli di lavoro nella cartella di lavoro attiva in Excel?
- Come filtrare i dati in base alla casella di controllo in Excel?
- Come riempire una serie di numeri in una colonna di elenco filtrata in Excel?
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- 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 della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!