Як оновити зведену таблицю при зміні даних у Excel?
Як відомо, якщо ви зміните дані у вихідній таблиці, відносна зведена таблиця тим часом не оновить дані в ній. Якщо вам потрібно оновити зведену таблицю, коли дані змінюються в таблиці в Excel, я можу розповісти вам кілька швидких способів.
Оновіть зведену таблицю на аркуші, натиснувши кнопку Оновити
Оновіть зведену таблицю на аркуші або книзі за допомогою VBA
Оновіть зведену таблицю на аркуші, натиснувши кнопку Оновити
В Excel існує функція «Оновити та оновити все» для оновлення зведеної таблиці на одному аркуші.
Клацніть зведену таблицю, для якої потрібно оновити дані, а потім натисніть варіант (у програмі Excel 2013 натисніть Аналізувати)> оновлення > оновлення. Дивіться знімок екрана:
Якщо ви хочете оновити всі зведені таблиці на одному аркуші, ви можете вибрати Оновити все.
Оновіть зведену таблицю на аркуші або книзі за допомогою VBA
За допомогою VBA ви можете не тільки оновити всі зведені таблиці на одному робочому аркуші, але також можете оновити всі зведені таблиці у всій книзі.
1. прес F11 + Alt клавіші на клавіатурі, щоб відкрити Microsoft Visual Basic для додатків вікна.
2 Потім натисніть Insert > Модулі щоб вставити нове вікно модуля. А потім скопіюйте наступний код VBA у вікно.
VBA: оновіть зведені таблиці на аркуші.
Sub AllWorksheetPivots()
'Updateby20140724
Dim xTable As PivotTable
For Each xTable In Application.ActiveSheet.PivotTables
xTable.RefreshTable
Next
End Sub
3. клацання прогін у вікні або клавішу F5 для запуску VBA, тоді зведені таблиці на аркуші оновляються.
Чайові: Щоб оновити всі зведені таблиці в цілій книзі, ви можете використовувати наступний VBA.
VBA: оновіть усі зведені таблиці в книзі.
Sub RefreshAllPivotTables()
'Updateby20140724
Dim xWs As Worksheet
Dim xTable As PivotTable
For Each xWs In Application.ActiveWorkbook.Worksheets
For Each xTable In xWs.PivotTables
xTable.RefreshTable
Next
Next
End Sub
Відносні статті:
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!