Referencing Shape with name (unique)?

[Gary]

I have stencils with names. For example I have a stencil object called C1.1

It has a shape called C1Text.0 and a shape called C1Text.1. C1Text0 is just
above the letter C and C1Text.1 is just below.

How can I change the text within C1Text.0 and C1Text.1 using VBA code and
not using the ItemFromID number because that changes each time??????

My unique name doesn't change and there is never a duplicate for my
application.

Thank You,

G

 

[David Parker]

You can use/create UniqueID for Documents, Pages and Shapes

 

[JuneTheSecond]

Hi,

I thought the relation is group.
If so, shape.shapes property gets the child shapes.
My test code is following.

Dim shp As Visio.Shape, child As Visio.Shape
Set shp = ActivePage.Shapes("DAD")
Set child = shp.Shapes("BOY")
child.Text = "My Boy"
ActiveWindow.Select shp.Shapes("BOY"), visSubSelect
ActiveWindow.Selection.BringToFront

 

[Gary]

Thank You,

Its working.

Gary