在Excel中使用控件可以实现图表的动态效果展示。
但是很多人并不知道,其实在PPT中同样可以利用控件实现动态图表效果。
PPT动态图表的原理实际上和Excel操作一致,将控件的选择项链接到指定单元格,再通过公式动态获取需要的数据。利用此处的数据作为图表的数据源,由于数据随控件选择项的内容而改变,故图表也随之改变。
PPT中操作的难点在于,如何让PPT中的控件选择项链接到Excel中的指定单元格。这就需要用到一点点的宏代码,否则无法实现。
第一步:新建一个PPT空白页,点击插入图表
第二步:点击图表,选择在Excel中编辑数据。
这个时候可以看到excel中的数据有三个系列。
将其修改为需要的数据样式。
第三步:点击开发工具菜单栏,插入组合框和文本框。
第四步:将代码放置在当前页的宏编辑器内。
切记,只有在幻灯片放映状态下才可以实现动态效果,编辑状态下点击控件是没有反应的。
Private Sub combobox1_gotfocus()
ComboBox1.List = Array("2019年", "2020年", "2021年")
End Sub
Private Sub ComboBox1_Change()
Set sh = Me.Shapes(1).Chart.ChartData.Workbook.ActiveSheet
sh.Range("d2") = ComboBox1.Value '筛选项的值放置在D2单元格
Me.TextBox1.Text = sh.Range("e2").Value '设置文本框显示的内容
End Sub
声明:所有白马号原创内容,未经允许禁止任何网站及个人转载、采集等一切非法引用。本站已启用原创保护,有法律保护作用,否则白马号保留一切追究的权利。发布者:白马号,转转请注明出处:https://www.bmhysw.com/article/19727.html