From the Visio shapesheet, you can call VBA procedures using RUNADDON("") or
CALLTHIS()
For example:
EventDblClick = CALLTHIS("MyProc)
The only way to get single-click funtionality is to watch the selection
changed event for a WithEvents window object.
Also, you might investigate adding right-mouse "Actions" in the shapesheet.
This allows you to right-click a shape, see a variety of menu items that you
add via the ShapeSheet, and call VBA procedures. Click-and-a-half at any
rate.
--
Hope this helps,
Chris Roth
Visio MVP
EricH said:
I would like to be able to click on a visio shape and have an event fire
that calls a VBA function or sub. Prefer to have event fire on single
click, but double click is ok too.