Kód: Vybrat vše
Datum = Worksheets("Source").Range("C9")
ActiveSheet.PivotTables("Kontingenční tabulka 1").PivotFields("Datum").CurrentPage = " & Datum & "
Kód: Vybrat vše
Datum = Worksheets("Source").Range("C9")
ActiveSheet.PivotTables("Kontingenční tabulka 1").PivotFields("Datum").CurrentPage = " & Datum & "
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 41 hostů