Как обновить сводную таблицу при изменении данных в Excel?
Как вы знаете, если вы изменяете данные в исходной таблице, относительная сводная таблица не обновляет данные в ней в то же время. Если вам нужно обновить сводную таблицу при изменении данных в таблице в Excel, я могу рассказать вам несколько быстрых способов.
Обновите сводную таблицу на листе, нажав кнопку «Обновить»
Обновить сводную таблицу на листе или в книге с помощью VBA
Обновите сводную таблицу на листе, нажав кнопку «Обновить»
В Excel есть функция «Обновить» и «Обновить все» для обновления сводной таблицы на одном листе.
Щелкните сводную таблицу, данные которой нужно обновить, а затем щелкните Опция (в Excel 2013 щелкните АНАЛИЗ)> обновление > обновление. Смотрите скриншот:
Если вы хотите обновить все сводные таблицы на одном листе, вы можете выбрать Обновить все.
Обновить сводную таблицу на листе или в книге с помощью VBA
С помощью VBA вы можете не только обновлять все сводные таблицы на одном листе, но также можете обновлять все сводные таблицы во всей книге.
1. Нажмите F11 + Альт вместе на клавиатуре, чтобы открыть Microsoft Visual Basic для приложений окно.
2. Затем нажмите Вставить > Модули чтобы вставить новое окно модуля. А затем скопируйте следующий код VBA в окно.
VBA: обновить сводные таблицы на листе.
Sub AllWorksheetPivots()
'Updateby20140724
Dim xTable As PivotTable
For Each xTable In Application.ActiveSheet.PivotTables
xTable.RefreshTable
Next
End Sub
3. Нажмите Run кнопку в окне или клавишу 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
- Обновить диапазон данных сводной таблицы в Excel
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!