Thema Datum  Von Nutzer Rating
Antwort
22.03.2022 13:27:27 Moba Marc
NotSolved
Blau Pivot lässt sich nicht ansprechen
17.04.2022 16:41:39 Gast18976
NotSolved

Ansicht des Beitrags:
Von:
Gast18976
Datum:
17.04.2022 16:41:39
Views:
831
Rating: Antwort:
  Ja
Thema:
Pivot lässt sich nicht ansprechen

Hallo,

anhand einer Beispiel-PivotTabelle ( https://www.traens.com/tipps/microsoft/excel-pivot-tabelle.html ) wurde festgestellt, dass der ein direktes Ändern der Eigenschaften "CurrentPage" und "ShowAllItems" nicht den gewünschten Effekt bringt. In Excel 2013 kann zudem die Eigenschaft "CurrerntPage" nicht direkt geändert werden.. Ein solcher Befehl löst ein Laufzeitfehler 1004 aus.

Um alle Einträge durch das löschen der Filter anzeigen zu lassen, muss die Methode "ClearAllFilters" ausgeführt werden.

Sub FilterEntfernen()
    'Sheets("Große Tabelle").PivotTables("pivotTable3").PivotFields("Händler").CurrentPage = "(All)"
    Dim sh As Worksheet
    Dim piv As PivotTable
    Dim pivFld As PivotField
    Set sh = Worksheets("Große Tabelle")
    Set piv = sh.PivotTables("PivotTable3")
    Set pivFld = piv.PivotFields("Händler")
    'pivFld.CurrentPage = "(All)"   ' Laufzeitfehler 1004
    'pivFld.ShowAllItems = True     ' Kein Laufzeitfehler, jedoch wird ein Filter nicht entfernt.

    pivFld.ClearAllFilters

End Sub

Dieser Befehl entfernt einen gesetzten Filter einer PitotTabelle.

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
22.03.2022 13:27:27 Moba Marc
NotSolved
Blau Pivot lässt sich nicht ansprechen
17.04.2022 16:41:39 Gast18976
NotSolved