Excel动画图表原理 _知识经验

在Excel中，我们可以绘制动画图表，如下图所示。

文章插图
下面我们来详细介绍实现Excel动画图表的过程。
准备数据
如下图1所示，在单元格区域A3:C16中是使用的示例数据。

文章插图
图1
以图1的示例数据为基础，使用公式得到数据区域E3:G16，如下图2所示。

文章插图
图2
其中，单元格F4中的公式为：
=IF($E4<=$F$1,B4,NA())
向下拉至单元格F16 。
单元格G4中的公式为：
=IF($E4<=$F$1,IF(C4=0,””,C4),NA())
向下拉至单元格G16 。
并将单元格F1命名为：
step
绘制图表
选择数据区域E3:F16，插入折线图，并添加数据标签，进行适当的格式设置，结果如下图3所示。

文章插图
图3
其中，数据标签取单元格区域G4:G16中的值，并显示引导线。在Excel 2016中设置数据标签格式如下图4所示。（在之前的Excel版本中，可能要经过一些操作才能达到同样的效果，或者使用专门的加载宏）

文章插图
图4
编写VBA代码
在绘制的图表右上角放置一个按钮控件，并指定宏，如下图5所示。
【Excel动画图表原理】

文章插图
图5
VBA代码如下：
Sub chartanimate()
Dim i As Long
Dim size As Long
size = 120
For i = 0 To size
[step] = i / 10
DoEvents
Next i
End Sub
调整图表设置
单击“开启动画绘图”按钮，效果如下图6所示。