I need some help from experts,

How to get vertices(co-ordinates) of any autoshape in PowerPoint using VBA. For example, I want the coordinates of three vertices of a triangle(add in the presentation using "from insert menu ---> shape" ) or coordinates of four vertices of a rectangle.