课时3-3 使用VBA代码设置自动刷新

红太狼 VBA的代码编辑框要如何调出来？

灰太狼：调出VBA代码编辑框的方法有3种。

①右键工作表名称→“查看代码”（图3-3-1）。

图3-3-1 从工作表名称处调出VBA代码编辑框

②按快捷键Alt+F11。

③“开发工具”→“Visual Basic”（图3-3-2）。

图3-3-2 从“开发工具”选项卡调出VBA代码编辑框

红太狼 知道VBA代码编辑框在哪了，那要自动刷新透视表该怎么操作呢？

灰太狼：首先，用到的VBA代码如下。

    Sub 更新（）
    ThisWorkbook.RefreshAll
    End Sub

其次，调出Visual Basic对话框后，先“插入”→“模块”（图3-3-3）→复制代码并粘贴进去即可。当要刷新透视表时，按住Alt+F8键调出宏，“执行”（图3-3-4）就可以刷新透视表。还可以在透视表边上插入一个图形，选中图形→右键→“指定宏”→选择宏→“确定”（图3-3-5），这样单击图形就可以刷新透视表。

图3-3-3 插入模块

图3-3-4 调出代码

图3-3-5 给图形指定宏

最后，需要注意一点，当Excel工作簿中使用了VBA代码，则保存工作簿的时候，需要另存为“Excel启用宏的工作薄”方式。

红太狼 VBA的加入，让透视表刷新更便捷啦！