Suggerimento: le altre lingue sono tradotte da Google. Puoi visitare il English versione di questo link.
Connetti
x
or
x
x
Registrati
x

or

Come aggiornare automaticamente i risultati dei filtri avanzati in Excel?

Quando applichiamo la funzione Filtro avanzato, scopriremo che il risultato filtrato non cambierà automaticamente con la modifica dei criteri. Questo ha bisogno di applicare nuovamente la funzione Filtro avanzato per ottenere il nuovo risultato. Ma hai qualche trucco buono e veloce per aggiornare automaticamente i risultati dei filtri avanzati come mostrato in Excel?

Aggiorna automaticamente il risultato del filtro avanzato con il codice VBA


Aggiorna automaticamente il risultato del filtro avanzato con il codice VBA


Il seguente codice VBA può aiutarti ad aggiornare automaticamente il risultato del filtro avanzato quando cambi i criteri di cui hai bisogno, per favore fai come segue:

1. Fare clic con il pulsante destro del mouse sulla scheda del foglio in cui si desidera filtrare automaticamente i dati, quindi scegliere Visualizza codice dal menu di scelta rapida, nell'apertura Microsoft Visual Basic per le applicazioni finestra, copiare e incollare il seguente codice nel modulo vuoto:

Codice VBA: aggiorna automaticamente il risultato del filtro avanzato:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A5:D21").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range _
("A1:C3"), Unique:=False
End Sub

Note: Nel codice precedente: A5: D21 è l'intervallo di dati che vuoi filtrare, A1: C3 è l'intervallo di criteri da filtrare in base a.

2. Quindi salvare e chiudere la finestra del codice, ora, quando si modificano i criteri nell'intervallo dei criteri, il risultato filtrato verrà aggiornato automaticamente in una sola volta.


Kutools per Excel risolve la maggior parte dei problemi e aumenta la produttività del 80%

  • Riutilizzo: Inserire rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Cifra le celle con password; Crea mailing list e invia email ...
  • Super Formula Bar (modifica facilmente più righe di testo e formula); Layout di lettura (leggere e modificare facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere i dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Previeni celle duplicate; Confronta le gamme...
  • Seleziona Duplica o Unica Righe; Seleziona righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molti libri di esercizi; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento alla formula; Creazione automatica di riferimenti a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • estrarre il testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare subtotali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtro ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale di grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle basate su colonne chiave; Dividi i dati in più fogli; Converti in batch xls, xlsx e PDF...
  • Oltre alle potenti funzionalità di 300. Supporta Office / Excel 2007-2019 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzioni complete di prova gratuita di 30-day.
kte tab 201905

Scheda Office Porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Editore, accesso, Visio e progetto.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la tua produttività di 50% e riduce centinaia di clic del mouse per te ogni giorno!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    JBir · 1 months ago
    Is there a way to do this without using VBA?
  • To post as a guest, your comment is unpublished.
    Pierre · 1 months ago
    Hello, this code works perfectly, there is just one problem, the copy/paste fonction doesn't work anymore.
    How could it be fixed?
    Thanks in advance
  • To post as a guest, your comment is unpublished.
    klaus · 5 months ago
    @Hannah: Yes, it is possible.
    In the following code the criteria is on the sheet "Filter".


    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Range("A5:D23").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
    Sheets("Filter").Range("A1:C3"), Unique:=False
    End Sub
  • To post as a guest, your comment is unpublished.
    invité · 10 months ago
    Ce code donne une erreur 1004 référence non valide. pouvez vous corriger le code proposé?
  • To post as a guest, your comment is unpublished.
    Christine · 10 months ago
    Bonjour, merci pour votre post qui m'aide énormément. Toutefois quel serait le code à ajouter pour coller le résultat dans un tableau d'une autre feuille de fichier et si possible pour au passage ne coller que certaines colonnes ?
    Pour être plus précise, en utilisant votre exemple je voudrais copier uniquement les colonnes "Product" et "Name" du résultat du filtre et ce dans une nouvelle feuille. Merci.
  • To post as a guest, your comment is unpublished.
    Hannah · 1 years ago
    Can I make the criteria come from a second sheet?
  • To post as a guest, your comment is unpublished.
    sumeet · 1 years ago
    it refreshes every time when any data changes.

    is it possible to refresh only when criteria changes.