只要光標(biāo)滑過不同的商品名稱,圖表就會(huì)自動(dòng)變化。 步驟一:準(zhǔn)備數(shù)據(jù)源 步驟二:輸入代碼 Alt+F11 打開VBE窗口,【插入】→【模塊】 復(fù)制如下代碼到模塊中,退出VBE窗口: Function techart(rng As Range)
Sheet1.[g1] = rng.Value
End Function 步驟三:輸入公式 在G1單元格中輸入任意一個(gè)商品名稱,如牛仔褲。 G2輸入公式,下拉至G13:
選中G1:G13,【插入】→【折線圖】 步驟四:美化圖表 設(shè)置折線圖為無線條。 設(shè)置數(shù)據(jù)點(diǎn)樣式,添加垂直線。 此處省略具體步驟,大家可以根據(jù)需要和喜好,設(shè)置出不同樣式不同風(fēng)格的圖表樣式。 最終效果如下:步驟五:輸入公式在圖表上方,輸入模擬圖表標(biāo)題的公式。=G1&'2015年銷售趨勢(shì)' 在圖表下方,輸入模擬坐標(biāo)軸的公式。 本例以J15:K16單元格區(qū)域?yàn)槔?,依次輸入以下公式?/span>
=IFERROR(HYPERLINK(techart(C1)),'◆'&C1&'◆'&REPT(' ',99))
=IFERROR(HYPERLINK(techart(E1)),'◆'&E1&'◆'&REPT(' ',99)) 輸入公式后的效果如下: 公式后面為什么要連接REPT(' ',99)呢? 如果只是單獨(dú)顯示分類的話,鼠標(biāo)需要停到文字上才會(huì)變化,所以使用99個(gè)空格占位,鼠標(biāo)只要停在當(dāng)前分類單元格任意一個(gè)地方,都可以觸發(fā)代碼運(yùn)行。 最后將文件保存成啟用宏的文件(xlsm)。 作者:提線木偶 |
|