Wie überprüfe ich, ob eine Pivot-Tabelle in einer Arbeitsmappe vorhanden ist?
Wenn Ihre Arbeitsmappe mehrere Pivot-Tabellen enthält und Sie jetzt schnell wissen möchten, ob in dieser Arbeitsmappe eine bestimmte Pivot-Tabelle vorhanden ist. Normalerweise können Sie im Dialogfeld PivotTable-Optionen nacheinander den Namen der Pivot-Tabelle überprüfen. Dies ist jedoch sehr zeitaufwändig und langwierig, wenn Dutzende oder Hunderte von Pivot-Tabellen vorhanden sind. Hier kann ich über einen Trick sprechen, mit dem Sie diese Aufgabe lösen können.
Überprüfen Sie, ob in einer Arbeitsmappe mit benutzerdefinierter Funktion eine Pivot-Tabelle vorhanden ist
Um schnell festzustellen, ob in der aktuellen Arbeitsmappe eine Pivot-Tabelle vorhanden ist, können Sie eine benutzerdefinierte Funktion erstellen, um diese zu lösen.
1. Öffnen Sie die Arbeitsmappe, in der Sie überprüfen möchten, ob die Pivot-Tabelle vorhanden ist.
2. Halten Sie die Taste gedrückt ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen-Fenster.
3. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modulfenster.
VBA-Code: Überprüfen Sie, ob in einer Arbeitsmappe eine Pivot-Tabelle vorhanden ist
Function PivotExist(Name As String) As Boolean
'Update 20141112
Dim sh As Worksheet
Dim pt As PivotTable
PivotExist = False
For Each sh In ActiveWorkbook.Worksheets
For Each pt In sh.PivotTables
If pt.Name = Name Then
PivotExist = True
Exit For
End If
Next
Next
End Function
4. Speichern und schließen Sie diesen Code, kehren Sie zu Ihrem Arbeitsblatt zurück und geben Sie diese Formel ein = Pivotexist ("Salereport") in eine leere Zelle, siehe Screenshot:
Notizen: (1.) In der obigen FormelVerkaufsbericht”Ist der Name der Pivot-Tabelle, die Sie überprüfen möchten.
(2.) Sie müssen den Namen der Pivot-Tabelle in doppelte Anführungszeichen eingeben und zwischen Groß- und Kleinschreibung unterscheiden.
5. Drücken Sie nach Eingabe der Formel die Eingabetaste, falls Sie diese erhalten TRUE In Ihrer Zelle existiert die Pivot-Tabelle, wenn Sie erhalten FALSCHist die Pivot-Tabelle nicht vorhanden.
In Verbindung stehende Artikel:
Wie liste ich alle Pivot-Tabellen in einer Arbeitsmappe auf?
Wie füge ich mehrere Felder zur Pivot-Tabelle hinzu?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten 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!
- Zuletzt aktualisiert am .