Excel圖表還能做成這樣，你咋不上天呢

今天繼續分享一個圖表技巧，先看效果：

GIF/82K

只要游標滑過不同的商品名稱，圖表就會自動變化，是不是很炫酷啊。

製作過程

一、準備數據源

二，輸入代碼

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啦！

滑動滑鼠看圖表，炫酷拉風不得了。

GIF/82K

作者：提線木偶

ExcelHome在線培訓中心助教

新浪微博@Excel-木偶fenzi ，易學寶微視頻系列教程作者之一。

喜歡這篇文章嗎？立刻分享出去讓更多人知道吧！