repositioning shape in group

[Joe]

I am using Visio 2002 and am using VBA to automate the creation of a diagram.

I have several shapes that are groups. Each group is composed of a textbox and a bitmap. Depending on where the shape is dropped on the page (right side, left side, top bottom, etc.), I would like the textbox to move. If the shape is dropped on the top of the page, I would like the textbox to be located above the bitmap; if the shape is dropped on the right side of the page, I would like the textbox to be on the right side of the bitmap, etc.

Does anyone know how to do this?

TIA,

 

[David Parker]

Insert TextTransform section and enter formula of your choice in the
TextPinX and TextPinY cells.
You can refere to the page center with ThePage!PageWidth*0.5 and
ThePage!PageHeight*0.5

I am using Visio 2002 and am using VBA to automate the creation of a diagram.

I have several shapes that are groups. Each group is composed of a

textbox and a bitmap. Depending on where the shape is dropped on the page
(right side, left side, top bottom, etc.), I would like the textbox to move.
If the shape is dropped on the top of the page, I would like the textbox to
be located above the bitmap; if the shape is dropped on the right side of
the page, I would like the textbox to be on the right side of the bitmap,
etc.

 

[Joe]

Thank you.
--
Joe

VBA Automation/VB/C++/Web and DB development

Insert TextTransform section and enter formula of your choice in the
TextPinX and TextPinY cells.
You can refere to the page center with ThePage!PageWidth*0.5 and
ThePage!PageHeight*0.5

I am using Visio 2002 and am using VBA to automate the creation of a diagram.

I have several shapes that are groups. Each group is composed of a

textbox and a bitmap. Depending on where the shape is dropped on the page
(right side, left side, top bottom, etc.), I would like the textbox to move.
If the shape is dropped on the top of the page, I would like the textbox to
be located above the bitmap; if the shape is dropped on the right side of
the page, I would like the textbox to be on the right side of the bitmap,
etc.