Event in VBA that starts only if I select a specific shape

[Guest_imported]

Is it possible to define an event with VBA that only starts If I select a specific shape and put it in my Visio sheet?
This event should only start if I select this specific shape.
It should not start if I select any shape from the stencil but only with this specific one for that I define the action before.

It could also be helpfull to know in which menu, window,... Visio places the name or caption of a shape.

Please help, Thanks