Savjet: drugi jezici su prevedeni na Google. Možete posjetiti English verzija ove veze.
Prijava
x
or
x
x
Registracija
x

or

Kako povezati filtar zaokretni tablice s određenom ćelijom u programu Excel?

Ako želite povezati filtar stožernog tablice s određenom ćelijom i izraditi tablicu zaokreta filtrirano na temelju vrijednosti ćelije, metodu u ovom članku vam može pomoći.

Povežite filtar zaokretne tablice s određenom ćelijom s VBA kôdom


Jednostavno odaberite cijele retke na temelju vrijednosti ćelije u certifikacijskom stupcu:

Odlomak Odaberite Specific Cells korisnost Kutools za Excel može vam pomoći da brzo odaberete cijele retke na temelju vrijednosti ćelije u certifikatnom stupcu u programu Excel kao što je prikazano na slici. Nakon odabira svih redaka na temelju vrijednosti ćelije, možete ih ručno premjestiti ili kopirati na novo mjesto kao što je potrebno u programu Excel.

Kutools za Excel: s više od 200 zgodnih Excel dodataka, slobodan pokušati bez ograničenja u 60 dana. Preuzmite besplatnu probnu verziju odmah!


Povežite filtar zaokretne tablice s određenom ćelijom s VBA kôdom

Pivotna tablica koju povezujete s funkcijom filtra na vrijednost ćelije treba uključiti polje filtra (naziv filtar polja ima važnu ulogu u sljedećem VBA kodu).

Kao primjer, uzmite dolje navedenu Pivot tablicu. Polje filtra u Pivot tablici naziva se Kategorija, a uključuje dvije vrijednosti "Troškovi"A"Prodaja”. Nakon povezivanja filma Pivot tablica na ćeliju, vrijednosti ćelija koje ćete primijeniti za filtriranje tablice zaokreta trebale bi biti "Troškovi" i "Prodaja".

1. Odaberite ćeliju (ovdje odaberem ćeliju H6) koju ćete povezati s funkcijom filtriranja Pivot Table i unaprijed unesite jednu od vrijednosti filtra u ćeliju.

2. Otvori radni list sadrži Pivot tablicu koju ćete povezati s ćelijom. Desnom tipkom kliknite karticu i odaberite Prikaz koda iz kontekstnog izbornika. Pogledajte snimak zaslona:

3. U Microsoft Visual Basic for Applications prozor, kopirajte ispod VBA koda u prozor s kodom.

VBA kôd: povežite filtar zaokretne tablice s određenom ćelijom

Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180702
    Dim xPTable As PivotTable
    Dim xPFile As PivotField
    Dim xStr As String
    On Error Resume Next
    If Intersect(Target, Range("H6:H7")) Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    Set xPTable = Worksheets("Sheet1").PivotTables("PivotTable2")
    Set xPFile = xPTable.PivotFields("Category")
    xStr = Target.Text
    xPFile.ClearAllFilters
    xPFile.CurrentPage = xStr
    Application.ScreenUpdating = True
End Sub

Bilješke:

1) "Sheet1"Je naziv otvorenog radnog lista.

2) "PivotTable2"Je naziv Pivot tablice koju povezujete njezinu funkciju filtra s ćelijom.

3) Polje filtriranja u pivotnoj tablici zove se "Kategorija".

4) Navedena ćelija je H6. Te vrijednosti promjenljivih vrijednosti možete promijeniti na temelju vaših potreba.

4. pritisni drugo + Q tipke za zatvaranje Microsoft Visual Basic for Applications prozor.

Sada je funkcija filtra Pivot tablice povezana s ćelijom H6.

Osvježite ćeliju H6, a odgovarajući podaci u Pivot tablici filtriraju se na temelju postojeće vrijednosti. Pogledajte snimak zaslona:

Prilikom mijenjanja vrijednosti ćelije, filtrirani podaci u Pivot tablici bit će automatski promijenjeni. Pogledajte snimak zaslona:

Kartica sustava Office - Kartično pregledavanje, uređivanje i upravljanje radnim knjigama u Excelu:

Kartica Office donosi kartice sučelje koje se vidi u web preglednicima kao što su Google Chrome, nove verzije programa Internet Explorer i Firefox za Microsoft Excel. To će biti alat koji štedi vrijeme i nezamjenjiv je u svom radu. Pogledajte demonstraciju u nastavku:

Kliknite besplatnu probnu verziju Office Kartica!

Kartica Office za Excel


Povezani članci:



Preporučeni alati za produktivnost

Kartica sustava Office

zlato star1 Donesite praktične kartice u program Excel i drugi Office, kao što su Chrome, Firefox i novi Internet Explorer.

Kutools za Excel

zlato star1 Nevjerojatno! Povećajte produktivnost u 5 minuta. Ne trebaju nikakve posebne vještine, osim dva sata svaki dan!

zlato star1 300 nove značajke za Excel, izraditi Excel mnogo jednostavan i snažan:

  • Spoji ćeliju / retke / stupce bez gubitka podataka.
  • Kombinirajte i konsolidirajte više tablica i radnih knjiga.
  • Usporedba raspona, kopiranje više raspona, pretvaranje teksta na datum, jedinica i pretvorba valuta.
  • Count po bojama, Paging Subtotal, Advanced Sort i Super Filter,
  • Više Odabir / umetanje / brisanje / tekst / oblikovanje / veza / komentar / radne knjige / alati za radne listove ...

Screen shot tvrtke Kutools za Excel

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.
    Jeri · 24 days ago
    what if i have more than 1 pivot table and to link to 1 cell. How shld i amend the code?
  • To post as a guest, your comment is unpublished.
    Sara · 5 months ago
    What if the cell that is linked to the Pivot Table, in this case H6, is on another worksheet? How does it change the code?
  • To post as a guest, your comment is unpublished.
    Frank · 6 months ago
    how to do it on mul;tiple field since in code there is only one target