Ugrás a tartalomra

Hogyan törölhető az egyik vagy az összes pivot tábla az Excelben?

A pivot tábla nagyon hasznos funkció az adatok megtekintéséhez vagy számításához az Excel programban, ezért általában beilleszthetünk pivot táblákat egy munkalapba vagy több munkalapba. De tudod, hogyan kell törölni egy vagy az összes pivot táblázatot egy munkalapon vagy az egész munkafüzeten?

Töröljön egy munkalap egyik forgatótáblát

Törölje az összes forgatótáblát az egész munkafüzetből a VBA segítségével


nyíl kék jobb buborék Töröljön egy munkalap egyik forgatótáblát

Az Excelben az egyik pivot táblázatot az alábbiak szerint törölheti:

1. Kattintson a pivot tábla jelentésre. Lásd a képernyőképet:

doc-delete-pivot-table-1

2. Ezután kattintson opció > választ > Teljes PivotTable hogy kiválassza az akkor forgatótáblát. Lásd a képernyőképet:

doc-delete-pivot-table-2

Tipp: Ha az Excel 2013 programot használja, akkor a gombra kattintva válassza ki a teljes pivot táblát Elemez > választ > Teljes PivotTable.

3. És nyomja meg töröl gombot a billentyűzeten, az elforduló tábla eltávolításra kerül.


nyíl kék jobb buborék Törölje az összes forgatótáblát az egész munkafüzetből a VBA segítségével

Ha több pivot-tábla van egy munkafüzetben, törölje őket egyenként, túl időigényes. Most egy VBA segítségével eltávolíthatja őket egyszerre.

1. nyomja meg Alt + F11 megjeleníteni a Microsoft Visual Basic for Applications ablak.

2. Az ablakban kattintson a gombra betétlap > Modulok új modulablak megjelenítéséhez, majd másolja a következő VBA kódot a modulablakba.

VBA: Távolítsa el az összes forgatótáblát az egész munkafüzetből.

Sub DeleteAllPivotTablesInWorkbook()
'Updateby20140618
Dim xWs As Worksheet
Dim xPT As PivotTable
For Each xWs In Application.ActiveWorkbook.Worksheets
    For Each xPT In xWs.PivotTables
        xWs.Range(xPT.TableRange2.Address).Delete Shift:=xlUp
    Next
Next
End Sub
3. kettyenés futás gombot, majd az egész munkafüzet összes pivot-tábláját eltávolítja.

Relatív cikkek:

A legjobb irodai hatékonyságnövelő eszközök

Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

kte lap 201905


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Se o Excel for antigo, uma forma rápida é mover a tabela dinâmica para uma nova guia e excluir a guia. Funciona: Opções => Ações => Mover Tabela Dinâmica => Nova Planilha.
This comment was minimized by the moderator on the site
Thank you, selecting all pivot and press delete does work. I used to moved the pivot table to another tab and then delete the tab...
This comment was minimized by the moderator on the site
this does not work. who wrote this?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations