Excel圖表坐標(biāo)軸是對(duì)數(shù)據(jù)圖形化得一個(gè)表現(xiàn)形式,通過坐標(biāo)軸圖表,趨勢(shì)可以直觀地看到數(shù)據(jù)表現(xiàn)出來得事物發(fā)展走向,所以,在數(shù)據(jù)圖形化中,這方面是需要一些設(shè)置得。
感謝介紹一些對(duì)象,來對(duì)數(shù)據(jù)坐標(biāo)軸進(jìn)行一下設(shè)置操作。
如上圖所示,簡(jiǎn)單設(shè)置一個(gè)圖表,對(duì)X軸進(jìn)行格式設(shè)置。
實(shí)際上就是給坐標(biāo)定義一個(gè)對(duì)象,然后設(shè)置對(duì)象得屬性。
Axis即單個(gè)坐標(biāo)軸對(duì)象,Axes為所有Axis對(duì)象得集合對(duì)象。
獲取方法:
Worksheets(1).ChartObjects(1).Chart.Axes(1)
上述代碼返回第壹個(gè)工作表中得第壹個(gè)圖表得第壹個(gè)坐標(biāo)軸對(duì)象。
Charts("chart1").Axes(xlCategory)
上述代碼返回圖表名稱為"chart1"得分類坐標(biāo)軸。
設(shè)置坐標(biāo)名稱、格式代碼
Private Sub CommandButton1_Click()Dim xChart As ChartSet xChart = Me.ChartObjects(1).ChartWith xChart.Axes(xlCategory) .HasTitle = True With .AxisTitle .Caption = "數(shù)據(jù)統(tǒng)計(jì)圖表" .Font.Size = 20 .Characters(1, 3).Font.Italic = True .Font.Color = 201121 .Position = -4144 .Top = 10 .Left = .Parent.Width \ 2 - .Width \ 3 .HorizontalAlignment = xlHAlignCenter '水平對(duì)齊 .VerticalAlignment = xlHAlignCenter End With With .Border .LineStyle = 1 .Color = RGB(11, 21, 211) End WithEnd WithSet xChart = NothingEnd Sub
通過上面得代碼,可以設(shè)置圖表軸X軸得顏色、線條樣式,以及坐標(biāo)軸名稱和樣式。
這里用到另一個(gè)對(duì)象:AxisTitle
AxisTitle對(duì)象可以返回坐標(biāo)軸標(biāo)題對(duì)象,對(duì)象屬性如下圖所示:
通過對(duì)AxisTitle對(duì)象得屬性設(shè)置,就可以自由設(shè)置坐標(biāo)標(biāo)題樣式了。
坐標(biāo)軸是一個(gè)相對(duì)涉及面廣得對(duì)象,因?yàn)榉祷氐靡恍?duì)象需要更多得基礎(chǔ)知識(shí),只有認(rèn)識(shí)了更得對(duì)象和屬性才能快速地設(shè)置這些對(duì)象得屬性值,以達(dá)到想要得效果。
歡迎感謝對(duì)創(chuàng)作者的支持、收藏
---END---