如何用vba将图表的系列绘制在次坐标轴? |
您所在的位置:网站首页 › 表格如何添加次坐标轴符号和数字 › 如何用vba将图表的系列绘制在次坐标轴? |
如何用vba将图表的系列绘制在次坐标轴?
2019年11月15日
作者:水星Excel
7,417 次浏览
暂无评论
Excel图表可以有主坐标轴和次坐标轴两个坐标轴。 对于数量级不一样的图表系列,如果都绘制在同一个坐标轴,会使得数据无法准备的表达。 如下图所示 图表中同比和环比明细数量级和其它系列的不一致,如果都绘制在主坐标轴,根本无法区分。 如果要在vba中将这两个系列绘制在次坐标轴,可以通过设置Series对象的AxisGroup属性,其中 将Series对象的AxisGroup属性的值设置为1(xlPrimary)表示绘制在主坐标轴,将值设置为2(xlSecondary)表示绘制在次坐标轴。 有了上述的知识,可以使用如下的vba代码将上述图表中的“同比”和“环比”系列值绘制在次坐标轴。 Sub QQ1722187970() Dim oWK As Worksheet Set oWK = Excel.ActiveSheet Dim oChartObject As ChartObject Set oChartObject = oWK.ChartObjects(1) Dim oChart As Chart Dim oSeries As Series Set oChart = oChartObject.Chart With oChart Set oSeries = .SeriesCollection("同比") With oSeries .AxisGroup = xlSecondary End With Set oSeries = .SeriesCollection("环比") With oSeries .AxisGroup = xlSecondary End With End With End Sub运行代码后的效果图如下所示: 其它相关文章推荐:如何用vba更改excel图表的类型?如何用vba设置图表的坐标轴的刻度线类型和刻度线标签的位置?如何用vba返回或设置图表系列的X轴值、Y轴值、气泡大小值?如何用vba访问操作图表系列的数据点(Point)对象?如何在excel中用vba把所有图形对象导出为图片格式的文件?如何区别Series、SeriesCollection、FullSeriesCollection对象? 分类 : VBA , 图表、图形 标签 : AxisGroup , chart , ChartObject , SERIES , 主坐标轴 , 图表 , 次坐标轴 , 系列声明: 本站文章均属原创,未经作者同意必须保留此段声明,且在文章页面明显位置给出原文链接,否则视为侵权。如果想要每天都收到本站的技术文章推送,可以微信搜索公众号:水星Excel或者Excel_Office关注。其它事宜请加QQ:1722187970 或微信号:xycgenius 联系。 |
今日新闻 |
推荐新闻 |
CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3 |