excel图表怎么创建动画商业图表
发布时间：2023-03-25 06:42:18
本文主要介绍如何将动画应用于商业图表，如下图1所示。
图1
制作图表的示例数据如下图2所示的工作表：
图2
在工作表中放置几个表单控件并设置相应的格式，如图3所示。
图3
其中，“下拉框”控件的控件格式设置如图3，数据源区域为图2所示工作表的单元格区域A43:A46，所选值链接到单元格B37。
下面的3个选项按钮链接到名为“chart_type”的单元格。
最后的“开启动画”复选框链接到名为“b_animation”的单元格；“开启擦除”复选框链接到名为“b_easing”的单元格。
如图4所示，在单元格区域B33:B39中放置图3中的控件值、设置图表动画的步骤以及图表标题。单元格区域D33:D39中为列B中对应单元格所定义的名称。
图4
其中，单元格B39所定义的名称为一个命名公式：
=INDEX($A$43:$A$46,record_index)
图5列出了工作簿中所有定义的名称：
图5
其中，old和switch_to_record是在运行VBA代码时添加的。
VBA代码如下：
PrivatebFinished As Boolean
PublicSub AnimateChart()
Dim i As Integer
bFinished = False
ThisWorkbook.Names.Add “old”,[chart_values]
ThisWorkbook.Names.Add”switch_to_record”, [record_index].Value
If [b_animation] Then
For i = 1 To [animation_steps]
[step] = i
DoEvents
If bFinished Then Exit For
Next i
End If
bFinished = True
EndSub
PublicSub ChangeChartType()
Const CHART_TYPE_COLUMN = 1
Const CHART_TYPE_LINE = 2
Const CHART_TYPE_AREA = 3
WithWorksheets(“demo”).ChartObjects(1).Chart
Select Case [chart_type]
Case CHART_TYPE_COLUMN
.ChartType = xlColumnClustered
Case CHART_TYPE_LINE
.ChartType = xlLineMarkers
Case CHART_TYPE_AREA
.ChartType = xlArea
End Select
End With
EndSub
其中，ChangeChartType过程关联到选项按钮，用于更改图表类型；AnimateChart过程关联到下拉框，用于实现选择不同数据时的图表动画效果。
最后的效果如下图6所示。
图6
0
投稿猜你喜欢
有时候在使用win7系统的时候，一些小伙伴会遇到在拖动窗口的时候出现重影的情况出现。那么碰到这种情况应该怎么办呢？今天就和小编一起来有什么操- 有用户在操作电脑的时候，遇到登录Xbox一直转圈的情况，不知道怎么回事？那下面我们就来看看Xbox一直转圈无法登录的解决办法。处理方法如下：
- 在制作wps表格的时候，要怎么设定纸张的大小呢?下面小编就为你介绍wps表格怎么设定纸张大小的方法啦!wps表格设定纸张大小的方法：可以通过
- Win10无法打开cmd运行窗口怎么办？我们使用电脑的时候，开启cmd指令运行窗口可以通过一些代码来查看系统重要信息，或者进行一些配置的修改
- 机械革命旷世笔记本是一款2022年上市的游戏型便携笔记本电脑，其采用了intel第十二代酷睿i9处理器以及发烧级核芯显卡，能够让用户们有着不
- 怎么在ppt里给图片上加标尺？在ppt里，对图片编辑如果添加标尺的话，可以更好的对图片整体更好的进行调整，那要怎么给图片添加尺寸标准线呢？来
- Excel中经常需要用到Excel自带的格式进行套用，具体该如何套用格式呢?下面是小编带来的关于excel2003套用格式的方法，希望阅读过
- 选择其中一列，按Ctrl+X剪切找到另一列的位置，在右键菜单中选择“插入剪切单元格”，然后按Ctrl+X剪切另一列找到第一列的位置，在右键菜
- 我们都知道Nvidia显卡驱动可以让驱动程序时刻保持最新状态、一键优化游戏设置，还可以录制游戏视频、捕捉游戏画面。那么Nvidia显卡怎么录
- camtasia怎么导出mp4？camtasia能在任何颜色模式下轻松地记录屏幕动作（屏幕/摄像头），包括影像、音效、鼠标移动轨迹、解说声音
- 最近使用win10系统的用户反应想把win10系统中的历史记录进行备份，但是打开设置-更新和安全-备份，使用文件历史记录进行备份，点击添加驱
- EXCEL中合并单元格在什么地方?1、单元格的合并：同时选中需要合并的单元格，然后按一下“格式”工具栏上的“合并及居中”按钮即可。2、撤销单
- 当我们使用win10系统时，在某些情况下，我们会突然遇到无法连接到Internet的情况。选择网络诊断后，我们将提示此计算机缺少一个或多个网
- 有道云协作该怎样邀请他人加入协作群？有道云提供一个非常好的功能，就是协作群，用户相互可以在里面共享文档内容，那么下面，小编就为大家介绍下有道
- 在excel中经常用到从某单元格中查找一些信息作为引用，那么find函数怎么用呢?今天，小编就教大家在Excel中find函数用法的操作技巧
- 手机wps设置表格对齐的方法。手机版本的WPS Office表格中，对于每个单元格的数据，我们可以根据需要，为其设置合适的对齐方式，那么，怎
- 数据透视图与常规的图表存在一些差异，其中最主要的不同之处就是在excel2016数据透视图中对数据进行筛选。创建一个数据透视图，以所选的字段
- 想让系统更快些，就需要优化它。虽然和之前版本相比，Win10在底层性能上已经不错，但毕竟要照顾不同的使用人群，因此它的很多项目还是偏向于保守
- 最近有小伙伴反映自己的应用程序提示0xc0000142无法正常启动不知道该怎么办，我们在使用win10电脑的时候，经常需要对电脑的一些应用程
- 有些用户家里是有小孩子的，小孩子喜欢玩电脑，但是不希望让孩子沉迷于网络，所以想控制一下孩子使用电脑的时间。Win10系统是有提供儿童模式的，
