Accessing shape labels

[Sachin]

Hi everyone.

I am trying to generate a connectivity list for a drawing (i.e. Shape
X connects to Shape Y etc...), and I know how to create this list so
that it shows up in the VBA immediate window.

I was wondering if there was any way to generate a list that uses the
actual text of the shape instead of visio's internal name for it.

For example, instead of producing "Rounded rectangle.22 connects to
rectangle.53", is there a wayI could get it to produce "Apples connect
to Fruit", if the text inside of Rounded rectangle.22 was "Apples",
and the text inside of rectangle.53 was "Fruit"?

Thanks in advance.

 

[AlEdlund]

instead of
debug.print shape.nameu
you might try
debug.print shape.text
al

 

[David J Parker]

It maybe best to use
debug.print shape.Characters.Text
because you may get ???? otherwise, as the text maybe referencing shape
data/customproperties.