各位老师：我在代码中，用数据表添加拆线图表，我想要的效果是：在拆线图上显示数据标签，并使标签显示在拆线的上方，

     代码如下：

       With Cht.SeriesCollection(1) 

           .HasDataLabels = True                                                                             \' 有数据标签

           .DataLabels.Position = MSExcel.XlLegendPosition.msoElementDataLabelTop   ‘ 数据标签显示在拆线的上方

       End With

但总是报错误，提示如下：

此主题相关图片如下：微信图片_20190806161519.png

 

总不知道代码错在哪里了，请老师指教！

谢谢！

谢谢老师，现在不报错了，但出现如图所示的提示，标签并没有在上

此主题相关图片如下：微信图片_20190806165008.png

请老师费心！