Excel Forum - Porady, Pomoc,  Excel Help, Excel FAQ Strona Główna
 FAQ  RegulaminRegulamin  Szukaj   Użytkownicy   Grupy   Rejestracja   Profil   Twoje wiadomości   Zaloguj 


Poprzedni temat «» Następny temat
ID tematu: 64704 Skopiuj do schowka Pętla przez elementy (pivot item) tabeli przestawnej - blad
Autor Wiadomość
pi3cho 
Exceloholic


Posty: 226
Wysłany: 09-04-2019, 21:25   Pętla przez elementy (pivot item) tabeli przestawnej - blad

Witam,
Z jakiegoś powodu nie jestem w stanie wyświetlić wartości elementów pola tabeli przestawnej dla jednej z dwóch kolumn ("Dane"). Dla kolumny "Nazwa" wszystko działa poprawnie. Czy może chodzić o numeryczny typ danych w polu "Dane"?

Kod:
Sub FilterPivotItems()

Dim PT          As PivotTable
Dim PTItm       As PivotItem

Set PT = ActiveSheet.PivotTables("pivot")

'Nie działa dla dane
'For Each PTItm In PT.PivotFields("Dane").PivotItems
'    Debug.Print PTItm.Value
'Next PTItm

'Działa dla Nazwa
For Each PTItm In PT.PivotFields("Nazwa").PivotItems
    Debug.Print PTItm.Value
Next PTItm


End Sub


Załączam skoroszyt.
Pozdrawiam

przyklad.xlsm
Pobierz Plik ściągnięto 13 raz(y) 18.07 KB

ID posta: 365753 Skopiuj do schowka
 
 
Tajan


Pomógł: 4351 razy
Posty: 9667
Wysłany: 09-04-2019, 21:32   

Niewłaściwy typ pola. Powinno być:
Kod:
For Each PTItm In PT.PageFields("Dane").PivotItems
    Debug.Print PTItm.Value
Next PTItm
ID posta: 365755 Skopiuj do schowka
 
 
pi3cho 
Exceloholic


Posty: 226
Wysłany: 09-04-2019, 21:45   

@Tajan
Bardzo dziękuję za pomoc. Oszczędziłeś mi mnóstwo nerwów ;-) Działa!
Przyznam, że nie do końca rozumiem takie działanie ponieważ w przypadku pola "Nazwa" bez względu gdzie je umieszczę (filtr czy pola wierszy) to zawsze kod działa poprawnie. Porównam PageFields z PivotFields, może coś mi się wyjaśni.
Jeszcze raz dziękuję!
ID posta: 365757 Skopiuj do schowka
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Theme xandgreen created by spleen& Programosy modified v0.3 by warna
Opieka techniczna www.marketingNET.pl

Archiwum

Strona używa plików cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przeglądarce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.
Sprawdź, w jaki sposób przetwarzamy dane osobowe