Wie filtere ich die Pivot-Tabelle basierend auf einem bestimmten Zellenwert in Excel?
Normalerweise filtern wir Daten in einer Pivot-Tabelle, indem wir Elemente in der Dropdown-Liste auswählen, wie im folgenden Screenshot gezeigt. Tatsächlich können Sie eine Pivot-Tabelle basierend auf dem Wert in einer bestimmten Zelle filtern. Die VBA-Methode in diesem Artikel hilft Ihnen bei der Lösung des Problems.
Filtern Sie die Pivot-Tabelle basierend auf einem bestimmten Zellenwert mit VBA-Code
Filtern Sie die Pivot-Tabelle basierend auf einem bestimmten Zellenwert mit VBA-Code
Der folgende VBA-Code kann Ihnen beim Filtern einer Pivot-Tabelle basierend auf einem bestimmten Zellenwert in Excel helfen. Bitte gehen Sie wie folgt vor.
1. Bitte geben Sie einen Wert, nach dem Sie die Pivot-Tabelle filtern möchten, im Voraus in eine Zelle ein (hier wähle ich Zelle H6 aus).
2. Öffnen Sie das Arbeitsblatt mit der Pivot-Tabelle, die Sie nach Zellenwert filtern möchten. Klicken Sie dann mit der rechten Maustaste auf die Registerkarte Blatt und wählen Sie im Kontextmenü die Option Code anzeigen. Siehe Screenshot:
3. In der Öffnung Microsoft Visual Basic für Applikationen Fenster, kopieren Sie unter VBA-Code in das Code-Fenster.
VBA-Code: Filter-Pivot-Tabelle basierend auf dem Zellenwert
Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180702
Dim xPTable As PivotTable
Dim xPFile As PivotField
Dim xStr As String
On Error Resume Next
If Intersect(Target, Range("H6:H7")) Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Set xPTable = Worksheets("Sheet1").PivotTables("PivotTable2")
Set xPFile = xPTable.PivotFields("Category")
xStr = Target.Text
xPFile.ClearAllFilters
xPFile.CurrentPage = xStr
Application.ScreenUpdating = True
End Sub
Notizen: Im Code,
4. Drücken Sie die Taste Andere + Q Tasten zum Schließen der Microsoft Visual Basic für Applikationen Fenster.
Anschließend filtert die Pivot-Tabelle basierend auf dem Wert in Zelle H6 (siehe Abbildung unten):
Sie können den Zellenwert nach Bedarf in andere ändern.
Hinweis: Die Werte, die Sie in Zelle H6 eingeben, sollten genau mit den Werten in der Dropdown-Liste Kategorie der Pivot-Tabelle übereinstimmen.
In Verbindung stehende Artikel:
- Wie kombiniere ich mehrere Blätter in einer Pivot-Tabelle in Excel?
- Wie erstelle ich eine Pivot-Tabelle aus einer Textdatei in Excel?
- Wie verknüpfe ich den Pivot Table-Filter mit einer bestimmten Zelle in Excel?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools for Excelund erleben Sie Effizienz wie nie zuvor. Kutools for Excel Bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeitersparnis. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt eine Tab-Oberfläche in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!














