Kako uporabiti isti filter na več listih v Excelu?

Mogoče je enostavno uporabiti funkcijo filtriranja za filtriranje podatkov na delovnem listu, včasih pa boste morda morali filtrirati več delovnih listov, ki imajo skupno oblikovanje podatkov z enakimi kriteriji filtriranja. Če jih filtriramo enega za drugim, bomo zapravili veliko časa, tukaj lahko predstavim preprost način za njegovo reševanje naenkrat.

Uporabi isti filter na več delovnih listih s kodo VBA

Uporabi isti filter na več delovnih listih s kodo VBA

Na primer, imam štiri delovne liste, saj je treba naslednji posnetek zaslona filtrirati z enakimi merili kot Product = KTE hkrati.

Neposrednega načina filtriranja podatkov v več listih v Excelu ni, toda naslednja koda VBA vam lahko pomaga dokončati to opravilo, naredite naslednje:

1. Držite tipko ALT + F11 tipke, nato odpre Microsoft Visual Basic za aplikacije okno.

2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Moduli Okno.

Koda VBA: Uporabi isti filter za več delovnih listov:

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. In nato pritisnite F5 ključ za zagon te kode, vsi izdelki KTE so bili filtrirani na vseh delovnih listih hkrati, glejte posnetek zaslona:

Opombe: Znotraj zgornje kode, v tej xWs.Range ("A1"). AutoFilter 1, "= KTE" skripta, A1 in = KTE označuje stolpec in merila, na podlagi katerih želite filtrirati, številka 1 je številka stolpca, na podlagi katere ste filtrirali, lahko jih spremenite po svoji potrebi. Če želite na primer filtrirati vrstni red, večji od 50, morate samo spremeniti ta skript, kot sledi: xWs.Range ("B1"). AutoFilter 2, "> 50".