Tento tutoriál předvede, jak aktualizovat kontingenční tabulku při změně dat pomocí VBA.
Kontingenční tabulky jsou mimořádně výkonným datovým nástrojem Excelu. Kontingenční tabulky nám umožňují analyzovat a interpretovat velké množství dat seskupením a shrnutím polí a řádků.
Když vytvoříme kontingenční tabulku, data se uloží do mezipaměti kontingenční tabulky. Data jsou proto uložena v mezipaměti počítače, což urychluje kontingenční tabulku.
Pokud aktualizujeme data, na která se spoléhá kontingenční tabulka, samotná kontingenční tabulka se automaticky neaktualizuje. K aktualizaci kontingenční tabulky bychom museli kliknout na tlačítko Obnovit vše na kartě Data na pásu karet.
Aktualizace kontingenční tabulky ve VBA
Když se data změní, můžeme do Worksheet_Change událost aktualizovat kontingenční tabulku. Abychom se dostali k události Change listu, musíme jít do editoru jazyka Visual Basic v Excelu (VBE).
lis Alt+F11 pro přístup k VBE nebo v Stuha, vyberte Vývojář> Visual Basic.
Poznámka: Pokud Vývojářskou pásku nevidíte, budete ji muset povolit.
V Průzkumník projektů, vyberte list, který obsahuje kontingenční tabulku.
V Objekt v rozevíracím seznamu vyberte Pracovní list. Tím se automaticky přidá událost pro Selection_Change.
V Postup v rozevíracím seznamu vyberte Změna.
A Změna Událost bude přidána do modulu VBA obsaženého v listu.
POZNÁMKA: Můžeme odstranit Worksheet_SelectionChange událost, protože není vyžadována.
V rámci Pracovní list_Změna událost, zadejte následující kód:
| 1 | ActiveSheet.PivotTables ("PivotTable1"). RefreshTable |
Přepněte zpět na list aplikace Excel a upravte hodnotu v datové tabulce. Data v kontingenční tabulce se poté automaticky aktualizují.
