Project) (Chart.ApplyDataLabels 方法

會將資料標籤套用到圖表中的所有數列。

語法

運算式。ApplyDataLabels (Type,IMsoLegendKey,AutoText,HasLeaderLines,ShowSeriesName,ShowCategoryName,ShowValue,ShowPercentage,ShowBubbleSize,Separator)

expression 代表 Chart 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Type 選用 Office.XlDataLabelsType 要套用的資料標籤類型。 預設值為 xlDataLabelsShowValue。
IMsoLegendKey 選用 變數 True 是表示 顯示旁之點的圖例。 預設值為 False。
AutoText 選用 變數 True 是表示 如果物件會自動產生適當的文字根據內容。
HasLeaderLines 選用 Variant 如果數列有指引線,則為 True 。
ShowSeriesName 選用 Variant True 可啟用資料標籤的系列名稱。 False 停用系列名稱。
ShowCategoryName 選用 Variant True 可啟用資料標籤的類別名稱。 False 可停用類別名稱。
ShowValue 選用 Variant True 可啟用資料標籤的值。 False 停用該值。如果未指定 Type 參數,則 會假設 ShowValue 為 True。
ShowPercentage 選用 Variant True 可啟用資料標籤的百分比。 False 可停用百分比。
ShowBubbleSize 選用 Variant True 可啟用資料標籤的泡泡大小。 False 可停用泡泡大小。
Separator 選用 變數 資料標籤的分隔符號。

傳回值

Nothing

範例

下列範例會將資料標籤套用至每個資料點。

Sub SetDataLabels()
    Dim chartShape As Shape
    Dim reportName As String
    
    reportName = "Simple scalar chart"
    Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
    
    chartShape.Chart.ApplyDataLabels
End Sub

另請參閱

Chart 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。