Jak skrýt mezisoučty v kontingenční tabulce?

Když v kontingenční tabulce přidáte do popisků řádků nebo sloupců více než jedno pole, zobrazí se mezisoučty. Zkusili jste někdy odstranit mezisoučty z kontingenční tabulky?

Skrýt nebo odebrat mezisoučty v jedné kontingenční tabulce

Skrýt nebo odebrat mezisoučty ve všech kontingenčních tabulkách aktuálního listu

Skrýt nebo odebrat mezisoučty v jedné kontingenční tabulce

Chcete-li odstranit mezisoučty v jedné kontingenční tabulce, existuje pro vás snadný způsob, postupujte takto:

1. Klikněte na libovolnou buňku v kontingenční tabulce a poté klikněte na Design > Mezisoučet > Nezobrazovat mezisoučty, viz screenshot:

2. A mezisoučty v určené kontingenční tabulce byly skryty najednou, viz screenshoty:

Skrýt nebo odebrat mezisoučty ve všech kontingenčních tabulkách aktuálního listu

Pokud ve vašem aktuálním listu existuje více kontingenčních tabulek, bude skrýt mezisoučty po jednom zdlouhavé, takže následující kód VBA vám pomůže odstranit mezisoučty ze všech kontingenčních tabulek.

1. Podržte ALT + F11 klíče a otevře se Okno Microsoft Visual Basic pro aplikace.

2. klikněte Vložit > Modula vložte následující kód do Okno modulu.

Kód VBA: Odstraňte mezisoučty ve všech kontingenčních tabulkách aktuálního listu

Sub RemoveSubtotals()
'Update 20140905
    Dim xPt As PivotTable
    Dim xPf As PivotField
    On Error Resume Next
    For Each xPt In Application.ActiveSheet.PivotTables
      For Each xPf In xPt.PivotFields
        xPf.Subtotals(1) = True
        xPf.Subtotals(1) = False
      Next
    Next
End Sub

3. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a mezisoučty ve všech kontingenčních tabulkách aktivního listu byly odstraněny najednou.

Tip: Chcete-li znovu zobrazit mezisoučty, můžete kliknout na kontingenční tabulku a kliknout Design > Zobrazit mezisoučty ve spodní části skupiny/ Zobrazit mezisoučty v horní části skupiny.

Související články:

Jak zobrazit více velkých součtů v kontingenční tabulce?

Jak třídit s vlastním seznamem v kontingenční tabulce?