excel2007怎樣為散點(diǎn)圖設(shè)置標(biāo)簽
Excel中經(jīng)常需要使用到為散點(diǎn)圖設(shè)置標(biāo)簽的技巧,散點(diǎn)圖的標(biāo)簽具體該如何進(jìn)行設(shè)置呢?對(duì)于剛從其它版本轉(zhuǎn)型過(guò)來(lái)的應(yīng)該就不會(huì)太懂吧,沒(méi)關(guān)系,下面是由學(xué)習(xí)啦小編分享的excel2007為散點(diǎn)圖設(shè)置標(biāo)簽的方法。
excel2007為散點(diǎn)圖設(shè)置標(biāo)簽方法
1:打開數(shù)據(jù)集,選擇數(shù)值型數(shù)據(jù),插入“散點(diǎn)圖”,即獲得該數(shù)據(jù)集的圖形。
2:Excel直接獲得的散點(diǎn)圖比較展示效果不太理想,需要自己手動(dòng)做一些調(diào)整。選擇水平坐標(biāo)軸,郵件,選擇“設(shè)置坐標(biāo)軸格式”,將坐標(biāo)軸選項(xiàng)的最小值調(diào)整為1.5,最大值調(diào)整為2.0。同樣的對(duì)縱軸也進(jìn)行同樣的設(shè)置,效果見下圖。
3:由于Excel不能直接添加標(biāo)簽,我們需要自己編寫宏來(lái)完成這個(gè)過(guò)程。因?yàn)檫@里有供參考的添加氣泡圖系列文本標(biāo)簽,我們首先將圖表類型更改為氣泡圖。
4:按“Alt+F11“鍵,打開VBA編輯器。
5:輸入下列代碼:
Sub AddLabel()
'為氣泡圖數(shù)據(jù)系列添加文本數(shù)據(jù)標(biāo)簽'
Dim rRng As Range
Dim i As Integer
On Error GoTo line1
Set rRng = Application.InputBox("選擇包含數(shù)據(jù)標(biāo)簽的列區(qū)域", Title:="選擇區(qū)域", Type:=8)
Selection.ApplyDataLabels
For i = 1 To rRng.Rows.Count
Selection.Points(i).DataLabel.Text = rRng.Item(i).Text
Next i
line1:
End Sub
6:代碼輸入完后,點(diǎn)擊運(yùn)行按鈕,出現(xiàn)”選擇包含數(shù)據(jù)標(biāo)簽的列區(qū)域“提示框。
7:在提示框內(nèi)選擇文本數(shù)據(jù)值,點(diǎn)擊確定,
8:這時(shí),再將數(shù)據(jù)類型更改為散點(diǎn)圖。點(diǎn)擊確定。完成。
猜你感興趣:
1.excel2007為散點(diǎn)圖設(shè)置標(biāo)簽的方法
3.excel2007如何設(shè)置工作表標(biāo)簽為顯示