To raskt vite om en pivot tabell eksisterer i den gjeldende arbeidsboken, kan du opprette en brukerdefinert funksjon for å løse det.
1. Åpne arbeidsboken som du ønsker å sjekke om pivot tabellen eksisterer.
To. Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vinduet.
3. Klikk Sett > Modul, og lim inn følgende kode i modulen Window
VBA-kode. Sjekk om en pivottabellen finnes i en arbeidsbok
Funksjon PivotExist (navn As String) As Boolean'Update 20141112 Dim sh Som Regneark Dim pt As Pivot PivotExist = False For Hver sh I ActiveWorkbook.Worksheets For Hver pt I sh.PivotTables Hvis pt.Name = Navn Da PivotExist = True Exit For End If Neste NextEnd Function4. Deretter lagre og lukke denne koden, kan du gå tilbake til regnearket, angir denne formelen = pivotexist ("salereport") inn i en tom celle, se skjermbilde:
Merknader: (1.) I formelen ovenfor, "salereport "er navnet på pivot tabell som du vil kontrollere.
(2.) Du må angi pivot tabell navnet i doble sitater, og navnet må være store og små bokstaver.
5. Etter inn i formelen, og trykk Enter-tasten, hvis du får TRUE på cella, eksisterer pivottabell, hvis du får USANN, ikke pivot tabellen finnes ikke. Anmeldelser