(Solved) – Create the position of an inserted graph in powerpoint


I am trying to write VBA code that can reproduce the following shape:

enter image description here

I wrote a piece of code that can create the shape:

Sub InsertShape()

Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddShape Type:=msoShapeChevron, _
    Left:=50, Top:=50, Width:=100, Height:=200

End Sub

However now I am looking for a way so I can adjust the width and height and move it to specific position. If I click on the shape (see highlighted areas) I see the target shape has the following values:

Height: 6:51
With: 7,07

Horizontal position: 11,16
Vertical position: 4,52

Any feedback on what I should add to the code so the shape is in the right position ( correct width an height).

Leave a Reply

Your email address will not be published. Required fields are marked *