python中气泡图文字标签_Excel中制作气泡图及为气泡图的系列数据点添加文本数据标签...
Excel中制作气泡图及为气泡图的系列数据点添加文本数据标签
时间:2014-08-01 作者:snow 来源:互联网
Excel中的散点图可以显示两组数据之间的关系,而气泡图则可以显示三组数据之间的关系。气泡图和三维气泡图 气泡图与 XY 散点图类似,但是它们对成组的三个数值而非两个数值进行比较。第三个数值确定气泡数据点的大小。您可以选择气泡图或者三维气泡图子类型。
气泡图中沿横坐标轴(x 轴)方向显示一组数值数据,沿纵坐标轴(y 轴)方向显示第二组数值数据,而第三组数值数据则用气泡的大小来显示。与散点图一样,其三组数据都必须为数值,不同的是气泡图中的每个数据点都对应三个数据。本文介绍在Excel中制作气泡图的方法以及快速为气泡图的系列数据点添加文本数据标签和快速在气泡图的图例中添加文本的方法。
简述
制作气泡图,在Exce的不同版本中各有不同,但大同小异,下面以Excel 2010为例为大家介绍下具体的制作步骤。有时我们需要在气泡图中给每个数据点添加文本数据标签,由于Excel没有提供直接的方法来给气泡图添加文本数据标签,所以可以用VBA代码来给所选择的数据系列添加指定区域中的文本数据标签,如果要在图例中显示数据区域第一列的文本内容,如“产品代号”,也可使用VBA代码来完成。
一、气泡图的基本制作步骤
假如某公司的部分产品有如图所示的三组数据,数据在A1:D7区域中,要用气泡图来显示其销售量、增长率及市场份额三者之间的关系。
Excel 2007/2010:
以Excel 2010为例
1.选择包含数值的区域,即B2:D7区域。与制作其他图表(如柱形图)不同,制作柱形图时,选择数据区域中的某个单元格再插入图表即可,但在制作气泡图时,如果选择了标题所在的第一行,气泡图中的数据可能显示不正确。
2.在功能区中选择“插入”选项卡,在“图表”组中单击“其他图表”,在“气泡图”下选择“气泡图”或“三维气泡图”,本例选择“三维气泡图”。Excel会在工作表中添加一个气泡图。
3.右击某个数据系列点,选择“设置数据系列格式”,弹出“设置数据系列格式”对话框。在Excel 2010中可直接双击某个数据系列点打开该对话框。选择“填充”,勾选“依数据点着色”,这样给每个数据点设置不同的颜色。
下面的步骤可根据实际需要进行设置。
4.修改或添加网格线。选择图表,在功能区中选择“图表工具-布局”选项卡,在坐标轴组中单击“网格线→主要横网格线→其他主要横网格线选项”,弹出“设置主要网格线格式”对话框,选择“线型”,在“短划线类型”右侧的下拉列表中选择某种线型,如“方点”。
用同样的方法设置主要纵网格线。
5.修改气泡的大小表示。按第3步中的方法打开“设置数据系列格式”对话框,选择“系列选项”,在右侧区域中根据需要选择按“气泡面积”或“气泡宽度”来表示气泡大小,还可将气泡大小按比例缩放。此处将气泡大小缩小为原来的80%。
最后完成气泡图。
Excel 2003:
1.选择包含数值的区域,即B2:D7区域。单击菜单“插入→图表”,弹出“图表向导”对话框。在对话框中选择图表类型为“气泡图”,子图表类型为“三维气泡图”,单击“完成”。
Excel在当前工作表中插入一个气泡图。
2.双击某个数据系列点,弹出“数据系列格式”对话框,选择“选项”,根据需要设置气泡大小,此处将气泡大小缩小为原来的80%,勾选“依数据点分色”,单击“确定”。
3.选择图表,单击菜单“图表→图表选项→网格线”,在“数值(X)轴”下勾选“主要网格线”,单击“确定”。在图表中分别双击“数值(X)轴主要网格线”和“数值(Y)轴主要网格线”,在弹出的“网格线”格式对话框中设置网格线样式。最后根据需要修改图表背景颜色、调整图表大小等。
二、在气泡图中为数据点添加文本数据标签
有时我们需要在气泡图中给每个数据点添加文本数据标签,由于气泡图中的三组数据都为数值,在气泡图中给数据点添加数据标签时,数据标签也显示为数值,有些不太直观。例如在上图中,我们就希望给每个数据点添加A2:A7区域所包含的“产品代号”文本标签:
Excel没有提供直接的方法来给气泡图添加文本数据标签。当气泡图中仅包含一个系列时,可以用下面的VBA代码来给所选择的数据系列添加指定区域中的文本数据标签。方法是:
1.按Alt+F11,打开VBA编辑器,在代码窗口中粘贴下列代码:
Sub AddLabel()
'为气泡图数据系列添加文本数据标签
Dim rRng As Range
Dim i As Integer
On Error GoTo line1
Set rRng = Application.InputBox("选择包含数据标签的列区域", Title:="选择区域", 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
2.返回Excel工作表界面,单击气泡图中某个数据系列点选择整个数据系列,如图:
按Alt+F8,打开“宏”对话框,选择“AddLabel”宏并执行。宏运行后会弹出一个“选择区域”对话框,用鼠标选择数据标签所在的列区域,如本例中的A2:A7区域,选择列区域时确保所选区域包含的单元格数量与图表数据系列点数量相同,单击“确定”即可。
三、将文本添加到气泡图的图例中
如上图所示,当气泡图只包含一个数据系列,并选择“依数据点着色”时,图例中的数据点名称都为数值格式。如果要在图例中显示数据区域第一列的文本内容,如“产品代号”,可以在气泡图中将每一行数据作为一个数据系列,并指定每个数据系列的名称为第一列中的各个文本,Excel会自动在图例中显示这些文本内容。
但这种方法在数据较多时比较繁琐,如果用VBA代码来完成则较为快捷。在Excel 2007/2010中,如果数据区域在相邻的四列中,要设置第一列为图例中显示的文本内容,第二列为x轴,第三列为y轴,第四列为气泡大小,选择数据区域中不包含第一行标题的四列,如图:
然后执行下面的代码:
Sub AddBubble()
'适用于Excel2007/2010
Dim objCht As Chart
Dim i As Integer
Dim iRows As Integer, iCols As Integer
Dim rRng As Range
Set rRng = Selection
iRows = rRng.Rows.Count
iCols = rRng.Columns.Count
If iCols = 4 Then
Set objCht = ActiveSheet.ChartObjects.Add(100, 80, 400, 250).Chart
For i = 1 To iRows
With objCht.SeriesCollection.NewSeries
.ChartType = xlBubble3DEffect
.Name = rRng.Item((i - 1) * 4 + 1)
.XValues = rRng.Item((i - 1) * 4 + 2)
.Values = rRng.Item((i - 1) * 4 + 3)
.BubbleSizes = rRng.Item((i - 1) * 4 + 4)
End With
Next
End If
End Sub
在Excel 2003中执行下列代码:
Sub AddBubbleFor2003()
'适用于Excel2003
Dim objCht As Chart
Dim rRng As Range
Dim i As Integer
Dim iRows As Integer, iCols As Integer, irow As Integer, icol As Integer
On Error GoTo line1
Set rRng = Selection
iRows = rRng.Rows.Count
iCols = rRng.Columns.Count
irow = rRng.Row
icol = rRng.Column
If iCols = 4 Then
rRng.Offset(0, 1).Resize(1, 3).Select
Set objCht = ActiveSheet.ChartObjects.Add(100, 80, 450, 250).Chart
objCht.SetSourceData Source:=Selection
For i = 1 To iRows
With objCht
.SeriesCollection.NewSeries
.ChartType = xlBubble3DEffect
.SeriesCollection(i).Name = rRng.Item((i - 1) * 4 + 1)
.SeriesCollection(i).XValues = rRng.Item((i - 1) * 4 + 2)
.SeriesCollection(i).Values = rRng.Item((i - 1) * 4 + 3)
.SeriesCollection(i).BubbleSizes = "=" & ActiveSheet.Name & "!R" & irow + i - 1 & "C" & icol + 3
End With
Next
End If
line1:
End Sub
上述代码根据所选区域数据创建一个三维气泡图,并将各行数据设置为不同的系列,从而在图例中显示各系列名称。
python中气泡图文字标签_Excel中制作气泡图及为气泡图的系列数据点添加文本数据标签...相关推荐
- 在合并单元格中数组公式无效_Excel中合并单元格困扰多年的难题,终于被我搞定了...
Excel表格中如果存在合并单元格,经常会遇到一些问题,比如序号填充.数据统计或筛选等,如下图所示,需要根据指定人员姓名查找引用对应的销售部门和销售金额. 这个问题关键在于销售部门列存在合并单元格,如 ...
- 【白板动画制作软件】万彩手影大师教程 | 添加文本
适当地添加文本会使视频内容更加完整和详细.精心设计的文字编辑和排版会提升整个视频的视觉美感. 具体操作步骤如下: 方法一: 1.依次点击元素工具栏中的"文本-添加文本"按钮,然后编 ...
- 一个列中多行求和_excel表格制作,Excel表格的基本操作,包含制作一个表格10方面的知识(1)...
蒹葭苍苍,白露为霜.所谓伊人,在水一方.溯洄从之,道阻且长.溯游从之,宛在水中央.蒹葭萋萋,白露未晞.所谓伊人,在水之湄.溯洄从之,道阻且跻.溯游从之,宛在水中坻.蒹葭采采,白露未已.所谓伊人,在水之 ...
- 在html页面中建立文字连接,html中如何建立超链接
html中建立超链接的方法:首先创建一个HTML示例文件:然后创建一个a标签并写入点击跳转的文字:接着在a后面写上href,并在href后面写入跳转链接:最后运行该HTML文件即可. 本文操作环境:w ...
- mysql怎么修改表中的文字_mysql表中怎么修改字段?
在mysql表中,可以使用"ALTER TABLE 表名 CHANGE 旧字段名 新字段名 数据类型;"语句来修改字段名称:使用"ALTER TABLE 表名 MODIF ...
- 中if判断中文_Excel中的逻辑函数的使用技巧 IF函数中的多条件判断
IF函数的基本结构很简单,真正使用的过程中,在于条件判断的写法,如何构造一个正确判断条件才是关键,也就是下图中A的构造才是IF函数的关键 交集.并集和求反函数应用技巧 常用的逻辑关系有3种,即[与]. ...
- 数据预处理---将文本属性标签转换为数字标签的方法
使用sklearn.preprocessing中的LabelEncoder模块
- html js文本框文字列出,js实现文本框中输入文字页面中div层同步获取文本框内容的方法...
这篇文章主要介绍了js实现文本框中输入文字页面中div层同步获取文本框内容的方法,实例分析了javascript操作dom元素的技巧,需要的朋友可以参考下 本文实例讲述了js实现文本框中输入文字页面中 ...
- Spring Boot 提取pdf中的文字
Spring Boot 提取pdf中的文字 提取pdf中的文字,由于字体不同,可能会提取出来乱码.(友情提示:建议先pdf文件转成图片,然后调用百度api提取文字,准确率高.跳转链接:https:// ...
最新文章
- squid中的X-Cache和X-Cache-Lookup的意义
- C# 36进制转10进制
- Careercup - Google面试题 - 5377673471721472
- Spark(6)——Spark与scala交互
- iOS CGRectGetMaxX/Y 使用
- Win环境安装VMware Server 2.0手记
- jQuery: 操作select option方法集合
- mysql生成十万数据脚本
- mysql 主从日志文件_mysql 主从日志文件mysql
- 读书笔记-你不知道的JS上-词法作用域
- 我有机器人合体成一个大力神_变形金刚动漫人物:狂派霸天虎挖地虎合体金刚-大力神...
- uCharts图表在小程序中的使用
- c语言判断一个已知的二叉树是否是二叉排序树_从ServiceComb学习写好go代码---二叉排序树...
- 关于各式竞赛书籍的点评
- 项目管理之WBS工作分解结构法
- Wex5 app 学习笔记(二)
- 计算机类期刊投稿经验
- 新人报道,请多多关照。
- UiBot RPA文字转拼音
- 计算机毕业生毕业论文写作及选题方向
热门文章
- 应用计算机测定电阻伏安特性,实验: 应用计算机测线性电阻伏安特性
- 我是如何在12周内由零基础成为一名程序员的——谨以此文激励自己!!!
- 修改客户端 与服务器断开,如何处理服务器或客户端socket断开
- 这三年,一路走来,劈荆斩棘 – Vol 1
- 毕业设计--20200228--内网搭建domoticz系统 frp内网穿透实现天猫精灵控制内网设备
- 下载keep运动软件_Keep下载_Keep苹果官方免费版APP下载[健身运动]-下载之家
- A. Neko Finds Grapes-奇偶的性质及运用-Codeforces Round #554 (Div. 2)
- moment.js时间操作
- Python Django框架下做电商项目
- MOS管做二极管使用