Прескочи на основното съдържание

Как да изтрия една или всички обобщени таблици в Excel?

Автор: Слънце Последна промяна: 2014-06-26

Обобщената таблица е много полезна функция за преглед или изчисляване на данни в Excel, така че обикновено можем да вмъкнем обобщени таблици в работен лист или няколко работни листа. Но знаете ли как да изтриете една или всички обобщени таблици в работен лист или в цялата работна книга?

Изтрийте една обобщена таблица в работен лист

Изтрийте всички обобщени таблици в цялата работна книга с VBA


стрелка син десен балон Изтрийте една обобщена таблица в работен лист

В Excel можете да изтриете една обобщена таблица, както следва:

1. Щракнете върху отчета с обобщена таблица. Вижте екранна снимка:

doc-delete-pivot-table-1

2. След това кликнете Опция > Изберете > Цялата обобщена таблица за да изберете след това обобщена таблица. Вижте екранна снимка:

doc-delete-pivot-table-2

Съвет: Ако използвате Excel 2013, моля, изберете цялата обобщена таблица, като щракнете върху Анализирам > Изберете > Цялата обобщена таблица.

3. И натиснете Изтрий бутон на клавиатурата, обобщената таблица ще бъде премахната.


стрелка син десен балон Изтрийте всички обобщени таблици в цялата работна книга с VBA

Ако имате няколко обобщени таблици в работна книга, изтриването им една по една отнема твърде много време. Сега можете да използвате VBA, за да ги премахнете наведнъж.

1. Натиснете Alt + F11 за показване на Microsoft Visual Basic за приложения прозорец.

2. В прозореца щракнете Поставете > Модули за да покажете нов прозорец на модула, след това копирайте следния VBA код в прозореца на модула.

VBA: Премахнете всички обобщени таблици в цялата работна книга.

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. кликване бягане бутон, тогава всички осеви таблици в цялата работна книга се премахват.

Относителни статии:

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
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