• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: Kontingenční tabulka - získání indexu skupiny

Zaslal/a Ludva14 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

Zaslat odpověď >

---

Ludva14(19.12.2017 16:26)#038834

Obrázek se z nějakého důvodu oříznul, tak na něj přidávám ještě odkazcitovat

AL(19.12.2017 20:30)#038836

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

elninoslov(19.12.2017 20:30)#038837

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

Ludva14(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

AL(20.12.2017 10:11)#038839

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

Ludva14(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)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse