Excel VBA图表形状位置错误

时间:2017-02-18 08:19:24

标签: vba excel-vba excel

我试图通过VBA在Excel中的图表中定位一个形状,虽然我已经设置了正确的位置参数,但结果是不同位置的形状,略有不同但不同。

我搜索了互联网,但我没有找到令人满意的答案,为什么会发生这种情况。

例如我使用此代码

Set shpRect = Chart1.Shapes.AddShape(msoShapeRectangle, 50, 75, 250, 175)

它生成一个矩形,但不是在50,75位置,而是在60,80等位置。

你知道解决这个问题吗?

1 个答案:

答案 0 :(得分:0)

如何将Shape定位到某个单元格,让它在创建之后说“C3"”

Set shpRect = Chart1.Shapes.AddShape(msoShapeRectangle, 50, 75, 250, 175)

With shpRect '<-- modify the shape's position 
    .Top = Range("C3").Top
    .Left = Range("C3").Left
End With