Excel VBA图表自动形状左上angular位置
我在Excel中有一个图表。 我已经为图表添加了一个形状:
excelChart.Shapes.AddShape(msoShapeRectangle, 0, 0, excelChart.ChartArea.width, 15)
我select了绿框,并运行下面的macros:
Sub Macro6() Selection.ShapeRange.Left = 0 Selection.ShapeRange.Top = 0 End Sub
我期待绿色框被定位在橙色图表区域的左上angular,但是正如你所看到的,在顶部/左边零点坐标开始之前,似乎有某种边距。
如何以编程方式将绿色框放在angular落里?
尝试使用IncrementLeft
和IncrementTop
。
Sub AddBox() Dim cht As Chart Set cht = Worksheets(1).ChartObjects(1).Chart With cht.Shapes.AddShape(msoShapeRectangle, 0, 0, cht.ChartArea.Width, 15) .Name = "MyShape" .IncrementLeft -5 //Experiment with number to get desired effect .IncrementTop -5 End With End Sub
- Pandas / Excel:调用DataFrame.to_excel()时将ALT-ENTER / CHAR(10)换行符编码为数据的任何方法?
- Python发送与TITUS分类的Outlook电子邮件