VBA將圖表顯示資料標籤
Excel資料標籤(Data Labels)是在呈現圖表數據時，可以更清晰地顯示每個數據點的具體數值，那要如何使用「VBA將圖表顯示資料標籤」呢？
如要將以下數據繪製圖表，並將圖表顯示資料標籤。
輸入巨集
※輸入以下指令※
Sub 顯示資料標籤()
Range("A1").CurrentRegion.Select
ActiveSheet.Shapes.AddChart
With ActiveSheet.ChartObjects(1).Chart
.HasTitle = True
.ChartTitle.Text = "圖表名稱"
.SetElement msoElementDataLabelOutSideEnd
End With
End Sub
執行巨集
點選「開發人員」-「 巨集」或按下「Ctrl」+「F8」快捷鍵，並「執行」巨集。
執行後則快速將「A1區域資料」繪製圖表，並將圖表顯示資料標籤。
語法說明
ActiveSheet.ChartObjects(1).Chart.HasTitle = True
‘顯示圖表標題
ActiveSheet.ChartObjects(1).ChartTitle.Text = “圖表名稱”
‘設定標題名稱為「圖表名稱」
ActiveSheet.ChartObjects(1).Chart.SetElement msoElementDataLabelOutSideEnd
‘將資料標籤設置於外部結束處
資料標籤位置語法
‧msoElementDataLabelNone – 無資料標籤
‧msoElementDataLabelCenter – 資料標籤置於中心
‧msoElementDataLabelInsideEnd – 資料標籤置於內部結束處
‧msoElementDataLabelOutsideEnd – 資料標籤置於外部結束處