定期使用数据透视表的人都非常了解此问题。
…即手动刷新工作簿中的数据透视表。
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.
第三步
右键单击此工作簿→插入→模块
您很可能会“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.
这是一个视频指南:
结论
如果您有一个或两个数据透视表’可以手动刷新它们。.但是如果您不止于此’最好使用“数据透视表刷新”宏。
相信我,借助此宏,您可以节省很多时间。
从今天开始使用此宏,如果您有任何问题或建议,请告诉我。