Marcin M.

Marcin M. korporacyjne zwierze

Temat: Tabela Przestawna: wyswietlanie wartosci filtra

Witam,

Potrzebuje znalezc sposob, ktory umozliwilby wyswietlenie w komorce np D5 wartosci uzytych filtrow w tabeli przestawnej. Staralem sie znalezc cos w Google ale udalo mi sie jedynie znalezc funkcje ktorym trzeba przypisac adres w ktorym jest komorka z filtrem. Ja natomiast potrzebuje kodu ktory sam znajdzie uzyte filtry i wyswietli ich wartosci + nazwy kolumn w ktorych sa te filtry.

Bede wdzieczny za pomoc.

Pozdrawiam,
Marcin
Łukasz W.

Łukasz W. Popyt Planuje
Produkcję

Temat: Tabela Przestawna: wyswietlanie wartosci filtra

Czesc

Szukam właśnie tego co tobie jest niepotrzebne:) mógłbyś dać adres gdzie znalazłeś " funkcje ktorym trzeba przypisac adres w ktorym jest komorka z filtre"

Pozdrawiam

Lukasz
Adrian Ławniczak

Adrian Ławniczak specjalista ds.
kontrolingu, NB
Polska Sp. z o.o.

Temat: Tabela Przestawna: wyswietlanie wartosci filtra

Witam.
Odnośnie wyświetlania wartości filtra tabeli przestawnej znalazłem coś takiego:
mrexcel
Jednak za Chiny nie mogę tego draństwa zmusić do działania, bo jestem zielony z VBA.

byłbym wdzięczny za pomoc.....

Adrian
Anna Pochyła

Anna Pochyła konsultant QlikView,
BPX

Temat: Tabela Przestawna: wyswietlanie wartosci filtra

A może coś takiego? Funkcja wymaga jako argumentu komórki z wnętrza tabeli przestawnej. (wersja poprawiona)

Function filtrTP(TPKom As Range) As String
Dim TP As PivotTable, PTF As PivotField, PTI As PivotItem
Dim result As String
For Each TP In TPKom.Parent.PivotTables
If Not Application.Intersect(TP.TableRange2, TPKom) Is Nothing Then Exit For
Next TP
For Each PTF In TP.PivotFields
If Not VarType(PTF.Position) = vbError And PTF.Orientation = xlPageField Then
result = result & " " & PTF.Name & ": "
For Each PTI In PTF.PivotItems
If PTI.Visible = True Then
result = result & "," & PTI.Value
End If
Next PTI
End If
Next PTF
filtrTP = result
End FunctionTen post został edytowany przez Autora dnia 02.12.13 o godzinie 08:47
Adrian Ławniczak

Adrian Ławniczak specjalista ds.
kontrolingu, NB
Polska Sp. z o.o.

Temat: Tabela Przestawna: wyswietlanie wartosci filtra

Byłoby rewelacyjnie gdyby działało..
Niestety funkcja zwraca błąd #ARG

Adrian.
Tomasz Gryzio

Tomasz Gryzio Dyrektor
zarządzający/Trener/
Konsultant - It
School

Temat: Tabela Przestawna: wyswietlanie wartosci filtra

Witam,

Funkcja filtrTP() jest napisana poprawnie dla filtrów nałożonych za pomocą pól Filtry raportu.

Przykład prawidłowego wywołania:
=filtrTP(F4)

Przykład nieprawidłowego wywołania:
=filtrTP(WEŹDANETABELI("x";$E$3;"a";1;"b";"a"))

Pozdrawiam!
Adrian Ławniczak

Adrian Ławniczak specjalista ds.
kontrolingu, NB
Polska Sp. z o.o.

Temat: Tabela Przestawna: wyswietlanie wartosci filtra

Witam.
Niestety u mnie zwraca błąd argumentu..

Adrian
PS. Tak, podaję "prawidłowe wywołanie"

Następna dyskusja:

Tabela przestawna- suma dwi...




Wyślij zaproszenie do