Dobrý den,
prosím Vás o pomoc s makrem na tvorbu kontingenční tabulky. Mám tento jednoduchý kód:
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"Zdroj!R10C1:R50000C10", Version:=xlPivotTableVersion14).CreatePivotTable _
TableDestination:="List13!R3C1", TableName:="Kontingenční tabulka 1", _
DefaultVersion:=xlPivotTableVersion14
Problém je, že makro vybere data pouze v dané oblasti. Bohužel při tvorbě kontingenčky se mně mění počet řádků, ze kterých se má vytvořit. Potřeboval bych prosím upravit makro tak, aby mně připravilo kontingenčku vždy ze všech dat.
Děkuji Vám za pomoc!
Alda
Makro na kontingenční tabulku
Re: Makro na kontingenční tabulku
Dobrý den,
proč nedáte soubor s příkladem?
Nebo můžete Zdroj vložit do tabulky a pak se odkazovat na jméno tabulky
proč nedáte soubor s příkladem?
Kód: Vybrat vše
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"Zdroj!R10C1:R" & Sheets("Zdroj").Cells(Rows.Count, "A").End(xlUp).Row & "C10", Version:=xlPivotTableVersion14).CreatePivotTable _
TableDestination:="List2!R3C1", TableName:="Kontingenční tabulka 1", _
DefaultVersion:=xlPivotTableVersion14
Nebo můžete Zdroj vložit do tabulky a pak se odkazovat na jméno tabulky
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 9
- 1126
-
od mmmartin
Zobrazit poslední příspěvek
29 srp 2023 16:47
Kdo je online
Uživatelé prohlížející si toto fórum: Facebook [Bot], Seznam[Bot] a 8 hostů