话说5月6日推送了随风老师分享的鼠标滑动自动变色的技巧（点此查看），技巧本身和故事情节都让人想入非非啊。
今天继续分享这个技巧的深入应用。先看效果：
只要光标滑过不同的商品名称，图表就会自动变化，是不是很炫酷啊。
那今天的教程作者和随风老师是什么关系呢？先来看一段对话吧：
（此处省略截图12张，对话内容自行脑补……）
看完上面的聊天记录，知道怎么回事了吧？
言归正传，教程继续
一、准备数据源
二，输入代码
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个空格占位，鼠标只要停在当前分类单元格任意一个地方，都可以触发代码运行。
将文件保存成启用宏的文件（xls、xlsm），OK啦！
滑动鼠标看图表，炫酷拉风不得了。
提线木偶
ExcelHome在线培训中心助教
新浪微博@Excel-木偶fenzi ，易学宝微视频系列教程作者之一。
编后话：
一对有着共同爱好的情侣，把自己的知识和幸福分享给大家。用您的拇指点赞吧，让我们一起祝福TA们：
爱情甜蜜，幸福美满！
在线培训班
Excel Home
近期开课时间：
HR玩转Excel 第8期 5/14 QQ群246666935
图表之美第9期 5/10 QQ群246666933
PPT美化设计第1期 5/18 QQ群246666939
财会玩转Excel第11期 5/27 QQ群246666936
函数实战精粹第10期 5/28 QQ群246666938
报名请咨询官方QQ：4000049448