EXCEL柱状图每个类别里每个柱子增加百分数

leli100

问题：根据表一做出了柱状图1，现在要在柱状图1上每一根柱子上增加一个发生率百分数，这个百分数来自与表二。百度了好久没解决，各位大神帮忙看下，谢谢！

sunya_0529

貌似没有快捷的操作可以实现，写了一个宏，你先用着吧。

1. Sub 添加数据标签项()
   
2. Dim rng As Range, i%, j%
   
3. Set rng = ActiveSheet.[B13:G16] '定义要添加的标签数据所在单元格区域
   
4. With ActiveSheet.ChartObjects(1).Chart
   
5.   .SetElement (msoElementDataLabelNone) '取消数据标签
   
6.   .SetElement (msoElementDataLabelOutSideEnd) '显示数据标签并将标签设置为“数据标签外”
   
7.   For i = 1 To .SeriesCollection.Count '循环写入要添加的数据标签
   
8.     For j = 1 To .SeriesCollection(i).Points.Count
   
9.       .SeriesCollection(i).Points(j).DataLabel.Text = .SeriesCollection(i).Points(j).DataLabel.Text & "," & Format(rng.Cells(j, i), "0%")
   
10.     Next j
    
11.   Next i
    
12. End With
    
13. Set rng = Nothing
    
14. End Sub

复制代码

leli100

sunya_0529 发表于 2016-10-4 22:15
貌似没有快捷的操作可以实现，写了一个宏，你先用着吧。

怎样能让0，0%这样的数据不显示，而且两个数据挨着显示不完全，可不可以把百分数设置成在柱状图上面的曲线上？谢谢你的帮助！