shapes.item numbering

[kris1]

I try to interface VISIO 5 scriptable objects to MathCAD.
A Mathcad demo shows how it works but access the considered
shapes through Shapes.Item(ObjIndex). How can I figured out (from VISIO workspace) a particular shape's ObjIndex.
Has anybody experiance with this ?
Thanks in advance

 

[johnwm]

The Index property reflects the order in which the Object is placed on the page. You will need to loop through the Shapes collection to identify a particular Shape to it's Index.

With ThisDocument.Pages("Page-1")
For Each x In .Shapes
'MsgBox x.Index & "  " & x.Name
'This is where you do your stuff
Next
End With

Good Luck
johnwm
________________________________________________________
To get the best from these forums read faq731-376 before posting

UK steam enthusiasts:

http://www.essexsteam.co.uk