MajaB.
23.04.19,14:53
Chcem poprosiť o radu:
Bunka B2=username().....meno prihlásenia napr.Kovac.
V kontingenčnej tabuľke je nastavený: filter menoviek (položka v stĺpci A) = B2 .
Chcem, aby hneď po otvorení tabuľky sa aktualizoval filter a vybrali sa dáta v stĺpci A podľa mena prihlásenia.Skúšala som zadať: filter menoviek (položka v stĺpci A) = B$2$, filter menoviek (položka v stĺpci A) = 'B2' - nefunguje filter.
Keď zadám presne: filter menoviek (položka v stĺpci A) = Kovac, filter funguje.
Prosím, vie mi niekto poradiť, aby sa filter aktualizoval po otvorení tabuľky podľa username ?
Ďakujem.
elninoslov
23.04.19,16:08
Ak tam máte nejakú funkciu "username", teda máte makro, teda použite obdobné riešenie ako v prílohe, pri udalosti "Workbook_Open"

Private Sub Workbook_Open()
On Error Resume Next
wsKT.PivotTables("ktMena").PivotFields("Meno").CurrentPage = wsKT.Cells(2, 2).Value
If Err.Number <> 0 Then MsgBox "Chyba pri filtrovaní kontingenčnej tabuľky", vbExclamation
End Sub
Maja B.
29.04.19,04:55
Ďakujem.
Maja B.
30.04.19,10:14
Vyskúšala som nasledovne:
Private Sub Workbook_Open()
On Error Resume Next

wsPracpro.PivotTables("Kontingenčná tabuľka3").PivotFields("Meno").CurrentPage = wsOOPP.Cells(2, 2).Value
If Err.Number <> 0 Then MsgBox "Chyba pri filtrovaní kontingenčnej tabuľky", vbExclamation
End Sub

Pracpro=názov exel.tabuľky
Kontingenčná tabuľka3- názov konting.tabuľky
Meno-názov položky, ktorú filtrujem
OOPP - aktívny hárok
Cell(2,2)=USERNAME()

Nefunguje mi to, prosím viete mi poradiť kde mám chybu ?
Ďakujem.