透過圖示設定來實現估計不行,因為設定每個點的標籤時,每個點的標籤自動採用X,Y的座標值。估計只能用VBA來程式設計來給每個節點標籤賦值,你通過錄制宏,然後檢視程式碼,自己編個程式來實現。 我舉個列子,比如有個點座標是(3,4,7),二維散點圖顯示的座標是,3,4,你要把它改成(3,4,7)
TextFrame1.TextRange.Characters.Text
TextRange.Characters.Text
.Select
.Points.Count
.DataLabel.Text
透過圖示設定來實現估計不行,因為設定每個點的標籤時,每個點的標籤自動採用X,Y的座標值。估計只能用VBA來程式設計來給每個節點標籤賦值,你通過錄制宏,然後檢視程式碼,自己編個程式來實現。 我舉個列子,比如有個點座標是(3,4,7),二維散點圖顯示的座標是,3,4,你要把它改成(3,4,7)
TextFrame1.TextRange.Characters.Text
= "3, 4,7" TextFrame1就是座標標籤的控制元件名,很有規律的,應該是TextFrame1,TextFrame2,TextFrame4...,你有多少個座標點就有多少個TextFrame。你要做的是就是做個迴圈,直接給TextFrame1的TextRange.Characters.Text
直接賦值。 給你我VBA參考程式碼: ActiveSheet.ChartObjects("圖表 1").Select
"這個程式碼選中圖示名為圖示1的圖示 ActiveChart.SeriesCollection(1).Points.Count
"獲得有多少個座標點 ActiveChart.SeriesCollection(1).Points(1).DataLabel.Text
= "1,2,3" "把圖示中的第一個系列的節點1的標籤改為"1,2,3" 修改整個圖示座標名的程式碼(前提是已經選中需要處理的圖表了): for i=1 to ActiveChart.SeriesCollection(1).Points.Count
ActiveChart.SeriesCollection(1).Points(1).DataLabel.Text
= Cells(i, 1) & "," & Cells(i, 2) & "," & Cells(i, 3) next i 這樣就解決了,實在不行的話,你把表格傳給我,我幫你做。