在Excel中使用控件可以实现图表的动态效果展示 。但是很多人并不知道，其实在PPT中同样可以利用控件实现动态图表效果 。PPT动态图表的原理实际上和Excel操作一致，将控件的选择项链接到在 Excel 中使用控件可以实现图表的动态效果展示 。
但是很多人并不知道 ， 其实在 PPT 中同样可以利用控件实现动态图表效果 。
文章插图
文章插图
PPT 动态图表的原理实际上和 Excel 操作一致，将控件的选择项链接到指定单元格，再通过公式动态获取需要的数据 。利用此处的数据作为图表的数据源，由于数据随控件选择项的内容而改变 ， 故图表也随之改变 。
PPT 中操作的难点在于，如何让 PPT 中的控件选择项链接到 Excel 中的指定单元格 。这就需要用到一点点的宏代码，否则无法实现 。
第一步：新建一个 PPT 空白页，点击插入图表
文章插图
文章插图
第二步：点击图表 ， 选择在 Excel 中编辑数据 。
文章插图
文章插图
这个时候可以看到 excel 中的数据有三个系列 。
文章插图
文章插图
将其修改为需要的数据样式 。
文章插图
文章插图
第三步：点击开发工具菜单栏，插入组合框和文本框 。
文章插图
文章插图
【怎样用ppt展示动态图表 ppt中动态图表的制作】第四步：将代码放置在当前页的宏编辑器内 。
文章插图
文章插图
切记 ， 只有在幻灯片放映状态下才可以实现动态效果，编辑状态下点击控件是没有反应的 。
Private Sub combobox1_gotfocus()ComboBox1.List = Array(\"2019 年\", \"2020 年\", \"2021 年\")End SubPrivate Sub ComboBox1_Change()Set sh = Me.Shapes(1).Chart.ChartData.Workbook.ActiveSheetsh.Range(\"d2\") = ComboBox1.Value \'筛选项的值放置在 D2 单元格Me.TextBox1.Text = sh.Range(\"e2\").Value \'设置文本框显示的内容 End Sub
