1、首先打开excel文档,输入要展示的数据信息。
2、选中要展示的数据区域内容,然后点击工具栏上的插入按钮,点击“柱形图”按钮。
3、然后在展示出来的柱形图上,选择一个柱形图,进行添加。
4、然后右键点击红色图案区域,图中以“净利润同比增长率”为例,在d出的菜单选项中点击“设置数据系列格式”.
5、在d出的界面中,选中次坐标轴选项。
6、右键点击图中红色区域,在d出的菜单中,点击“更改系列图表类型”选项,然后在展示的图表中,点击折线图,然后选择一个折线图样式,然后点击确定。
7、就能得到效果图了,当然在每个图上右键点击,在菜单中选择“添加数据标签”选项,可以添加标签信息。
Sub 宏()Dim co As ChartObject
i=0
For Each co In ActiveSheet.ChartObjects '处理当前工作表中所有的图表
i=i+1
co.Chart.Axes(xlCategory).HasTitle = True '显示横轴标题
co.Chart.Axes(xlCategory).AxisTitle.Text =cells(i,1) '请修改为统一标题内容
Next co
End Sub
借用一百℃猪高手的代码修改下,未运行仅供测试。
横轴标题
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)