如何用vba将图表的系列绘制在次坐标轴？ |
您所在的位置：网站首页 › 如何增加图表系列 › 如何用vba将图表的系列绘制在次坐标轴？ |
如何用vba将图表的系列绘制在次坐标轴？
|
如何用vba将图表的系列绘制在次坐标轴？
2019年11月15日
作者：水星Excel
7,285 次浏览
暂无评论
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运行代码后的效果图如下所示：
声明: 本站文章均属原创，未经作者同意必须保留此段声明，且在文章页面明显位置给出原文链接，否则视为侵权。如果想要每天都收到本站的技术文章推送，可以微信搜索公众号：水星Excel或者Excel_Office关注。其它事宜请加QQ：1722187970 或微信号：xycgenius 联系。 |
【本文地址】