Find shapes' coordinates

[John B]

I have a flowchart drawing consisting of rectangles with text boxes under
each rectangle (aligned centre, some of them not perfectly alighed). What I
am trying to do is print the text of the rectangle and the text in the text
box below it.

Is there a way of programmatically producing a list in text (e.g. csv format)?

e.g.
in visio:

------------------------- ---------------------
| drivetrain assembly|------------>| water tank |-------->
------------------------- ---------------------
external in-house

output to csv file

Rectangle Textbox

 

[John B]

no worries, I have figured it out.

the "cells" property is the one I need.
Shapes.Item(1).Cells("PinX")