excel2007為散點圖設(shè)置標(biāo)簽的方法

　　Excel中經(jīng)常需要使用到為散點圖設(shè)置標(biāo)簽的技巧，散點圖的標(biāo)簽具體該如何進(jìn)行設(shè)置呢?下面是由學(xué)習(xí)啦小編分享的excel2007為散點圖設(shè)置標(biāo)簽的方法，以供大家閱讀和學(xué)習(xí)。

　　excel2007為散點圖設(shè)置標(biāo)簽方法：

　　散點圖設(shè)置標(biāo)簽步驟1：打開數(shù)據(jù)集，選擇數(shù)值型數(shù)據(jù)，插入“散點圖”，即獲得該數(shù)據(jù)集的圖形。

　　散點圖設(shè)置標(biāo)簽步驟2：Excel直接獲得的散點圖比較展示效果不太理想，需要自己手動做一些調(diào)整。選擇水平坐標(biāo)軸，郵件，選擇“設(shè)置坐標(biāo)軸格式”，將坐標(biāo)軸選項的最小值調(diào)整為1.5，最大值調(diào)整為2.0。同樣的對縱軸也進(jìn)行同樣的設(shè)置，效果見下圖。

　　散點圖設(shè)置標(biāo)簽步驟3：由于Excel不能直接添加標(biāo)簽，我們需要自己編寫宏來完成這個過程。因為這里有供參考的添加氣泡圖系列文本標(biāo)簽，我們首先將圖表類型更改為氣泡圖。

　　散點圖設(shè)置標(biāo)簽步驟4：按“Alt+F11“鍵，打開VBA編輯器。

　　散點圖設(shè)置標(biāo)簽步驟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

　　散點圖設(shè)置標(biāo)簽步驟6：代碼輸入完后，點擊運行按鈕，出現(xiàn)”選擇包含數(shù)據(jù)標(biāo)簽的列區(qū)域“提示框。

　　散點圖設(shè)置標(biāo)簽步驟7：在提示框內(nèi)選擇文本數(shù)據(jù)值，點擊確定，

　　散點圖設(shè)置標(biāo)簽步驟8：這時，再將數(shù)據(jù)類型更改為散點圖。點擊確定。完成。