Get access to Visio shape in an ActiveX visio page

[Frank]

Hello,
I put an Visio ActiveX component into an Access-form. Now I want to get
access to a shape in this ActiveX-Visio-page, if I click to it. If I uses the
normale OnUpdated, OnEnter, OnExit, OnGotFocus and OnLostFocus events of this
AxtiveX-Visio I didn´t get the link to the shape that I clicked. I read
something about AddAdvise functions, but I don´t have experience with that.
It would be perfect, if somebody have an VBA example for something like that.
What I need is an event to my Access-form that appears allways if I select a
shape on this ActiveX-Visio-page. After that I can use the ".primaryitem"
function to get access to the active shape.
Thank´s
Frank

 

[Al Edlund]

frank,
can you share what versions you are using of access and visio activex?
tks,
al

 

[Frank]

Hello,
my Versions are:

Access 2000 (9.0.6926 SP-3)
Visio Professional 2003 SP1 (11.4301.6360)

Thank´s
Frank

 

[Frank]

Hello,
I got a solution. I made a small research in the Mircosoft Visio 2003 SDK.
There is a description for Mouse Events with VBA. The basic is a
"WithEvents" function to the Visio-ActiveX-element. Than a special
Click-function selects the shape in the area where the mouse were clicked and
gives the name of this shape.