手把手教你,学会使用HYPERLINK函数制作动态图表

示例32-10鼠标触发的动态图表
利用函数结合VBA代码制作动态图表,当鼠标指针悬停在某一选项上时,图表能够自动展示对应的数据系列,如图32-81所示。
具体操作步骤如下。
步 骤 1
按<Alt+F11>组合键打开VBE窗口,在VBE窗口中选择【插入】→【模块】命令,然后在模块代 码窗口中输入以下代码,最后关闭VBE窗口,如图32-82所示。
Function techart(rng As Range)
Sheet1.[g1] = rng.Value
End Function
代码中的“Sheet1.[g1]”为当前工作表的G1单元格,用G1单元格获取触发后的分类,可根据实际表格情况设置单元格地址。
步 骤 2
在G1单元格中任意输入一个分类名称,如“衬衫”,在G2单元格中输入以下公式,并向下复制到G13单元格,如图32-83所示。
=HLOOKUP(G$1,B$1:E2,ROW(),)
步 骤 3
选中G1:G13单元格区域,依次选择【插入】→【插入柱形图或条形图】→【簇状柱形图】命令,生成一个簇状柱形图。
单击图表柱形系 列,在编辑栏中更改SERIES函数的第二参数为A2:A13单元格区域,适当美化图表。
步 骤 4
选中J3:J8单元格区域,设置为【合并后居中】,输入以下公式。
=IFERROR(HYPERLINK(techart(B1)),B1)
选中K3:K8单元格区域,设置为【合并后居中】,输入以下公式。
=IFERROR(HYPERLINK(techart(C1)),C1)
选中J9:J14单元格区域,设置为【合并后居中】,输入以下公式。
=IFERROR(HYPERLINK(techart(D1)),D1)
选中K9:K14单元格区域,设置为【合并后居中】,输入以下公式。
=IFERROR(HYPERLINK(techart(E1)),E1)
公式中的techart函数,是之前在VBA代码中自定义的函数,将各产品的列标签单元格引用作为自定义函数的参数。
用HYPERLINK函数创建一个超链接,当鼠标指针移动到超链接所在单元格时,会出现屏幕提示,同时鼠标指针由【正常选择】切换为【链接选择】,当鼠标指针悬停在超链接文本上时,超链接会读取HYPERLINK函数第一参数返回的路径作为屏幕提示的内容。此时,就会触发执行第一参数中的自定义函数。
由于HYPERLINK的结果会返回错误值,因此,使用IFERROR屏蔽错误值,将错误值显示为对应的产品名称。
步 骤 5
选择J3:K14单元格区域,设置【填充颜色】为浅红色。然后依次选择【开始】→【条件格式】→【新建规则】选项,打开【新建格式规则】对话框。在【选择规则类型】列表框中选择【使用公式确定要设置格式的单元格】选项,然后在【为符合此公式的值设置格式】编辑框中输入以下公式。
=J3=$G$1
单击【格式】按钮,打开【设置单元格格式】对话框。切换到【字体】选项卡,设置字体颜色为白色。再切换到【填充】选项卡,设置填充颜色为红色,最后依次单击【确定】按钮关闭对话框。设置条件格式的作用是凸显当前触发的产品名称。
步 骤 6
在J2单元格中输入以下公式作为动态图表的标题。
=G1&'2017年销售趋势'
至此,图表制作完成。由于使用了VBA代码,因此要将工作簿保存为“Excel启用宏的工作簿(*.xlsm)”格式。

---------------------------------------------------------------------

推荐图书

北京大学出版社
Excel 2016函数与公式大全

1. 专家云集:多位身处各行各业,并身怀绝技的微软全球有价值专家与您无私分享。多年对 Excel的研究结果进行揭秘。
2. 知识点全覆盖:详尽而又系统地介绍了 Excel 2016函数与公式的所有技术特点和应用方法,全面覆盖相关知识点,完备知识体系无人能及。
3. 解决实际问题:大量源自实际工作的典型案例,通过细致地讲解,生动地展示各种应用技巧,快速提高读者的办公效率,让读者提前完成手头工作,不用加班。
4. 专业级深度剖析:对常常困扰学习者的功能性特性进行深入剖析,可以让读者既能知其然,又能知其所以然。

(0)

相关推荐