简单而强大的宏来刷新工作簿中的所有数据透视表

S

定期使用数据透视表的人都非常了解此问题。

…即手动刷新工作簿中的数据透视表。

It’如果报表中有一个或两个数据透视表,则完全可以使用手动方法。

…但是如果您有5到10个数据透视表,然后需要定期刷新它们,该怎么办?

嗯..那个’s a boring job.

因此,考虑到这一点,我编写了本教程,以帮助您构建自己的数据透视表刷新宏以使过程自动化。


编写数据透视表刷新宏的步骤 


第1步 

创建一个新的Excel工作簿并另存为“启用宏的工作簿/ Excel Binary工作簿” [文件类型].

第2步

前往“Developer” tab and click on “Visual Basic”

如果你有唐’t have “Developer”工作簿中的标签 [默认情况下将其禁用] 请参考以下教程 enable the 开发者 tab.

开发者 tab in excel

第三步

右键单击此工作簿→插入→模块

您很可能会“Module 1” under Modules

步骤4

单击新创建的模块,然后开始编写您的宏代码,如下所示。

Sub Refresh_All_PivotTables()

   Dim WSheet As Worksheet
   Dim PVT As PivotTable

     For Each WSheet 在 ActiveWorkbook.Worksheets
         For Each PVT 在 WSheet.PivotTables
           PVT.RefreshTable
           PVT.Update
        Next
   Next

 End Sub

现在,您已经在宏中需要代码来刷新所有数据透视表,它’是时候学习如何使用此宏了。

步骤5

使用数据透视表打开报表,还打开数据透视表刷新宏。
[如果看到任何警告消息,请继续并单击“Enable this content”]

步骤#6

在您的报告上,单击→Alt + F8→选择宏名称→单击运行

那’s all… !!!

如何运行数据透视表刷新宏

现在返回到报表中的每个数据透视表并进行检查。一世’确保他们会刷新最新信息。

It’s cool, isn’t it..?

…但是等等,有问题。

该宏将不会扩展数据透视表的数据范围,而只会刷新工作簿中的所有数据透视表。

试想一下,如果将新数据添加/添加到现有数据表中,将会发生什么?

显然,您的数据透视表将没有最新数据。


如何自动扩展数据透视表范围


我能想到的最好的方法是将数据范围转换为表。

这样,您的数据范围将在添加/添加新数据时自动更新。

但…你是怎样做的 ..?

好吧’非常简单,只需单击即可完成。


将Excel范围转换为表格的步骤


第1步

在数据表中选择整个数据。

第2步

前往Insert menu → Click on Table

或者,您也可以使用Ctl + T 快捷键 对于相同的。

第三步

现在去“Design”选项卡→属性下→更改表名称(默认情况下称为“Table1”), I’d call it as a “my_data”

更改表名称不是强制性的,但是’具有描述性的表名称以进行快速对帐会很好。

步骤4

通常,将新数据粘贴到表下时,数据将自动转换为表。

但是..在少数情况下可能不会…

(我不’不知道确切原因,但有时确实会发生)

如果不…. then you can do it quickly by going to → 设计 → select ‘Resize table’ under ‘properties’ → select range.

这是一个视频指南:

你可以下载 枢轴刷新宏 从这里。

结论 


如果您有一个或两个数据透视表’可以手动刷新它们。.但是如果您不止于此’最好使用“数据透视表刷新”宏。

相信我,借助此宏,您可以节省很多时间。

从今天开始使用此宏,如果您有任何问题或建议,请告诉我。

关于作者

Sudheer Tammini

你好,
我是“ Excel爱好者”和技术的早期采用者。我想学习新事物,并使用技术解决最棘手的业务问题(相信我,这很有趣)。除了运营此网站外,我还是一名全职员工,并拥有金融学硕士学位。

订阅我们的: 通讯
了解更多: 关于我