在 VBA 中刷新所有透视表

我们将通过示例介绍如何在 VBA 中刷新所有数据透视表。

在 VBA 中刷新所有数据透视表

首先，我们将了解什么是数据透视表以及为什么在 Excel 中使用它。数据透视表是用于汇总大量数据的交互式表格。

它通常用于显示数据，例如月度销售报告、月度费用明细或类似内容。

一旦我们更新了 Excel 工作表中的数据或将新数据添加到工作表中，有时需要刷新数据透视表以显示正确的数据。

VBA 提供了两种不同的方法可用于刷新数据透视表。一种方法用于以无缝批次刷新所有内容。

首先，我们将讨论如何在 Excel 中创建数据透视表。要创建一个新的数据透视表，我们需要转到插入并单击表，然后单击数据透视表。

将弹出一个窗口，允许我们选择创建数据透视表的范围，如下所示。

RefreshAll 方法用于刷新工作簿中的所有数据透视表。让我们通过一个示例，并使用此方法刷新工作簿中的所有数据透视表，如下所示。

Sub refresh()
ThisWorkbook.RefreshAll
End Sub

这将刷新工作簿中的所有数据透视表。如果我们想从某个工作表刷新某个数据透视表，我们可以使用工作表的 PivotTables 方法并应用 Refreshtable 方法来刷新该数据透视表，如下所示。

Sub refresh()
Sheet1.PivotTables("myPivotTable").Refreshtable
End Sub

输出：