Tento tip umožňuje uživatelům sestav vybrat si mezi několika formáty kontingenční tabulky pomocí tlačítek možností a poté kontingenční tabulku automaticky aktualizovat! (Hodí se, když uživatelé mají předvolby formátu sestavy, aniž by museli jít na panel nástrojů kontingenční tabulky a pokaždé si jednu vybrat)
Krok první:
Umístěte tlačítko volby (nebo několik) kamkoli na list se sestavou kontingenční tabulky a pojmenujte je například „Formát zprávy 1“, „Formát zprávy 2“ atd.…
Udělejte to tak, že přejdete na „Zobrazit> Panely nástrojů> Formuláře“, v panelu nástrojů zvolíte „Tlačítko možností“ a přetáhnete jej do sestavy.
Krok dva:
Vytvořte makro tak, že přejdete na „Nástroje> Makro> Makra“, zadáte název, například „Format2“ a poté „Vytvořit“
Zadejte nebo vyjměte a vložte následující kód VB. ) název kontingenční tabulky v níže uvedeném kódu s názvem, který vaše kontingenční tabulka pojmenovala):
Podformát2 ()
„Makro Format2
ActiveSheet.PivotTables ("PivotTable1"). PivotSelect "", xlDataAndLabel, True
ActiveSheet.PivotTables ("PivotTable1"). Formát xlReport6
Buňky. Vyberte
S výběrem
.HorizontalAlignment = xlGeneral
.VerticalAlignment = xlBottom
.WrapText = False
.Orientace = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
Konec s
S výběrem
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientace = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
Konec s
Buňky. Vyberte
Výběr. Sloupce. Autofit
Rozsah („A1“). Vyberte
End Sub
~~~~~~~~~~~~~~~~~~~~~~~~~
Pomocí stejného kódu můžete vytvářet makra různých formátů a jediný řádek, který musíte změnit, je „Formát xlReport6“. Na výběr je asi 15 formátů zpráv. Jednoduše změňte „xlReport (číslo)“ z 1 na 15.
Výše uvedený kód také automaticky přizpůsobí sloupce a vycentruje text po formátování sestavy.
Krok třetí:
Přiřaďte makro k tlačítku možností kliknutím pravým tlačítkem myši na tlačítko možností, zvolte „Přiřadit makro“ a jednoduše vyberte makro, které jste právě vytvořili. Udělejte to pro každé z vašich tlačítek možností
A je to! Když nyní uživatel klikne na tlačítko možnosti, kontingenční tabulka se automaticky aktualizuje na formát na základě možnosti formátu, která byla použita v makru. Otestujte několik stylů sestav, abyste zjistili, které vyhovují vašim potřebám, a poté je přiřaďte ke svým makrům a tlačítkům možností.
Vaši uživatelé budou vděční a docela na ně zapůsobí!
Hodně štěstí!
~ CJ