专栏名称: Excel之家ExcelHome
excel技巧原创教程每日推送,excel表格职场模板干货仓库,图文/视频/动画等多种教学方式分享excel操作技巧教程/excel函数公式教程/excel数据透视表教程/excel图表教程/Word教程,助您轻松提高办公效率!
目录
相关文章推荐
Excel之家ExcelHome  ·  五分钟详解SUMIF函数,条件求和不用愁 ·  2 天前  
完美Excel  ·  第1名🆒👍 ·  4 天前  
Excel之家ExcelHome  ·  这几个Excel函数公式,简单又高效 ·  5 天前  
完美Excel  ·  Excel新的公式符号# ·  6 天前  
完美Excel  ·  将矩形区域/数组转换为单列 ·  1 周前  
51好读  ›  专栏  ›  Excel之家ExcelHome

随光标变化的动态图表

Excel之家ExcelHome  · 公众号  · Excel  · 2024-10-20 06:45

正文

小伙伴们好啊,今天和大家分享一个动态图表技巧,先看效果:

只要光标滑过不同的商品名称,图表就会自动变化。


步骤一:准备数据源


步骤二:输入代码

Alt+F11 打开VBE窗口,【插入】→【模块】

复制如下代码到模块中,退出VBE窗口:

Function techart(rng As Range)
Sheet1.[g1] = rng.Value
End Function


步骤三:输入公式

在G1单元格中输入任意一个商品名称,如牛仔裤。

G2输入公式,下拉至G13:

=HLOOKUP(G$1,B$1:E2,ROW(),)


选中G1:G13,【插入】→【折线图】


步骤四:美化图表

设置折线图为无线条。

设置数据点样式,添加垂直线。

此处省略具体步骤,大家可以根据需要和喜好,设置出不同样式不同风格的图表样式。

最终效果如下:


步骤五:输入公式

在图表上方,输入模拟图表标题的公式。

=G1&"2015年销售趋势"

在图表下方,输入模拟坐标轴的公式。

本例以J15:K16单元格区域为例,依次输入以下公式:

=IFERROR(HYPERLINK(techart(B1)),"◆"&B1&"◆"&REPT(" ",99))
=IFERROR(HYPERLINK(techart(C1)),"◆"&C1&"◆"&REPT(" ",99))
=IFERROR(HYPERLINK(techart(D1)),"◆"&D1&"◆"&REPT(" ",99))
=IFERROR(HYPERLINK(techart(E1)),"◆"&E1&"◆"&REPT(" ",99))

输入公式后的效果如下:


公式后面为什么要连接REPT(" ",99)呢?

如果只是单独显示分类的话,鼠标需要停到文字上才会变化,所以使用99个空格占位,鼠标只要停在当前分类单元格任意一个地方,都可以触发代码运行。

最后将文件保存成启用宏的文件(xlsm)。


作者:提线木偶

1、点击或搜索微信公众号【 Excel之家ExcelHome】到公众号首页。

2、点击右上角【···】,在下拉菜单中点击【设为星标】。

设置星标后,小伙伴们就不用担心错过咱们的推送了!

设为星标,精彩内容不错过