Cum să reîmprospătați automat datele filtrate în Excel când sunt actualizate

Îmbunătățirea Filtrării Datelor în Excel: Actualizare Automată

Microsoft Excel oferă posibilitatea de a filtra datele, o funcționalitate esențială pentru analiza și înțelegerea unor volume mari de informații. Această opțiune devine extrem de utilă, mai ales pentru cei care nu sunt familiarizați cu crearea bazelor de date complexe. Filtrarea în Excel este simplă, permițând includerea sau excluderea rapidă a datelor dintr-o coloană. Important de reținut este că, odată aplicat, filtrul acționează și asupra valorilor din rândurile corespunzătoare. Totuși, o limitare a filtrelor standard este că acestea nu se actualizează în mod automat. Dacă o valoare într-o coloană filtrată se modifică, fie manual, fie printr-o formulă, filtrele trebuie reaplicate. Un mic fragment de cod poate rezolva această problemă, permițând actualizarea dinamică a datelor filtrate.

Pentru a utiliza acest cod, este necesar să activați macrocomenzile și să salvați fișierul Excel ca fișier cu macrocomenzi (.XLSM). Salvarea se realizează accesând meniul Fișier > Salvare ca, apoi selectând „Registru de lucru cu macrocomenzi Excel” din dialogul respectiv.

Următorul pas constă în selectarea foii de lucru căreia i-ați aplicat filtrele. Faceți click dreapta pe ea și alegeți opțiunea „Vizualizare cod” din meniul contextual.

Acest lucru va deschide o fereastră Microsoft Visual Basic, afișând codul foii de lucru curente. Introduceți următorul cod în această fereastră:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Me.FilterMode = True Then
        With Application
            .EnableEvents = False
            .ScreenUpdating = False
        End With

        With ActiveWorkbook
            .CustomViews.Add ViewName:="Temporar", RowColSettings:=True
            Me.AutoFilterMode = False
            .CustomViews("Temporar").Show
            .CustomViews("Temporar").Delete
        End With
        With Application
            .EnableEvents = True
            .ScreenUpdating = True
        End With
    End If

End Sub

Salvați fișierul. Dacă nu ați salvat deja fișierul ca registru de lucru cu macrocomenzi, Excel vă va cere să o faceți. Fișierul salvat va fi o copie nouă și nu va suprascrie fișierul original.

După adăugarea codului, modificarea oricărei celule dintr-o coloană filtrată va determina o actualizare automată a datelor filtrate, respectând criteriile stabilite. Acest script a fost conceput de Sorin, un utilizator de pe platforma Stack Exchange.