Question

我有一个问题：我正在使用Interop在Powerpoint中创建一个图表，这很有效。但我有一个问题：我需要获取数据集数据标签的确切位置来绘制一些形状。但如何获得该死的位置？ DataLabel有左侧和顶部值，但它们似乎无效，例如：如果我在该位置上绘制某些东西，它就会显示出来。是否有某种转变，我必须这样做？

我的代码如下所示：导入pptNS = Microsoft.Office.Interop.PowerPoint

for i = 1 to Targetchart.Seriescollection.count

    Dim DtL = DirectCast(TargetChart.SeriesCollection(i).datalabels, pptNS.DataLabels)
    For x = 1 To DtL.count
         Dim   DTS = DirectCast(DTL.Item(DTLItem), pptNS.DataLabel)
         Dim Left =dts.left 'seems to be wrong?
    next
 next

任何帮助都会很棒！

Answer 1

我找到了一个解决方案：Topposition将是： TopPos = DTS.Top + TargetChart.ChartArea.Top + TargetShape.Top + 1.5 Dim LeftPos = DTS.Left + TargetChart.ChartArea.Left + TargetShape.Left

1.5。为Topposition添加了因为有一点差距......

Powerpoint 2007 Chart查找Datalabel位置

1 个答案: