我们在用Excel绘制散点图或气泡图时，希望展示每个散点或每个气泡的文本标签，由于Excel不能直接添加标签，我们需要自己编写宏来完成这个过程。下面介绍具体操作方法。
工具/原料
Excel
文本、数值型数据
方法/步骤
1、打开数据集，选择数值型数据，插入“散点图”，即获得该数据集的图形。
2、Excel直接获得的散点图比较展示效果不太理儿疫诱翡想，需要自己手动做一些调整。选择水平坐标轴，邮件，选择“设置糖蒯梏迹坐标轴格式”，将坐标轴选项的最小值调整为1.5，最大值调整为2.0。同样的对纵轴也进行同样的设置，效果见下图。
3、由于Excel不能直接添加标签，我们需要自己编写宏来完成这个过程。因为这里有供参考的添加气泡图系列文本标签，我们首先将图表类型更改为气泡图。
4、按“Alt+F11“召堡厥熠键，打开VBA编辑器。输入下列代码：SubAddLabel()'为气泡图数据系列添加文本数据标签'DimrRngAs惺绅寨瞀RangeDimiAsIntegerOnErrorGoToline1SetrRng=Application.InputBox("选择包含数据标签的列区域",Title:="选择区域",Type:=8)Selection.ApplyDataLabelsFori=1TorRng.Rows.CountSelection.Points(i).DataLabel.Text=rRng.Item(i).TextNextiline1:EndSub代码输入完后，点击运行按钮，出现”选择包含数据标签的列区域“提示框。
5、在提示框内选择文本数据值，点击确定，
6、这时，再将数据类型更改为散点图。点击确定。完成。
