excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: Kontingenční tabulka - získání indexu skupiny
MS Excel
Téma: Kontingenční tabulka - získání indexu skupiny 
Zaslal/a 19.12.2017 16:25
Dobrý den,
potřeboval bych pomoci s následující kontingeční tabulkou:
Mým cílem je nějakým způsobem získat informaci na jaké úrovni se momentálně nacházím (červeně označeno). Je něco takového možné přes počítané pole/makro?
Děkuji
(19.12.2017 16:26)#038834
Snad takto:Sub test()
Dim pt As PivotTable, cell As Range
Set pt = ActiveSheet.PivotTables(1)
pt.DataBodyRange.Cells(1, 1).Offset(-1, 1) = "Úroveň"
For Each cell In pt.RowRange
If cell.PivotCell.PivotCellType = 1 Then cell.Offset(0, 2) = cell.PivotCell.PivotField.Position
Next cell
End Subcitovat
Dim pt As PivotTable, cell As Range
Set pt = ActiveSheet.PivotTables(1)
pt.DataBodyRange.Cells(1, 1).Offset(-1, 1) = "Úroveň"
For Each cell In pt.RowRange
If cell.PivotCell.PivotCellType = 1 Then cell.Offset(0, 2) = cell.PivotCell.PivotField.Position
Next cell
End Subcitovat
No mám jedno prosté/sprosté riešenie (matica):
=MAX(IF(COUNTIF(OFFSET($A$2:$A$5;;{2;1;0});F2)>0;{3;2;1}))
=MAX(KDYŽ(COUNTIF(POSUN($A$2:$A$5;;{2;1;0});F2)>0;{3;2;1}))
F2 je prvá dátová bunka KT.
Na prd je, že to musíte nakopírovať na potrebný/predpokladaný počet riadkov KT.citovat
=MAX(IF(COUNTIF(OFFSET($A$2:$A$5;;{2;1;0});F2)>0;{3;2;1}))
=MAX(KDYŽ(COUNTIF(POSUN($A$2:$A$5;;{2;1;0});F2)>0;{3;2;1}))
F2 je prvá dátová bunka KT.
Na prd je, že to musíte nakopírovať na potrebný/predpokladaný počet riadkov KT.citovat
(20.12.2017 10:01)#038838
Super, díky. Ještě se zeptám - je nějaká možnost dostat tohle číslo přímo do KT? Potřeboval bych totiž ve výsledku podle toho jaká je to úroveň zobrazit v KT určité číslo z buňky.citovat
Z tvojej odpovede nie je jasné, ktoré riešenie pokladáš za super.
Nie je mi známy spôsob, ako priamo v KT zobraziť hodnotu pozície PivotFieldu. Podľa môjho názoru žiadny taký spôsob neexistuje, mám za to, že by popieral logiku KT.citovat
Nie je mi známy spôsob, ako priamo v KT zobraziť hodnotu pozície PivotFieldu. Podľa môjho názoru žiadny taký spôsob neexistuje, mám za to, že by popieral logiku KT.citovat
(21.12.2017 8:50)#038844
Obě řešení fungovaly - takže díky za obě. Každopádně jsem se obával, že přímo do KT to nenarvu. Mám takové krkolomější zadání, kde jsem potřeboval, že třeba pokud bude úroveň 1, tak potřebuji vzít a zobrazit číslo z nějaké buňky uplně mimo data KT a s tím pak dále pracovat.citovat
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Helios iNuvio
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.
RSS nejnovější články