Custom Properties ??

[TotallyConfused]

Hi, I had posted before regarding having Custom Properties pop up when double
clicking on a position in Org Chart. However, I notice that the style/look
of the Custom Properties is not the same as the View/Custom Properties. How
can I get the same look when of the View/Custom Properties dialog box to pop
up when I double click on position in org chart? I do not want the user to
have to go to menu and choose Custom Properties from the view selection.
Thank you.

 

[John Goldsmith_Visio_MVP]

There is an Application DoCmd function, 1658, which toggles the Custom
Properties window aka View / Custom Properties, but it's not available as a
ShapeSheet function unfortunately.

If you feel you must use it instead of 1312 (it's the same data) then you'd
have to add a code procedure and then use the CALLTHIS Shapesheet function
to run it. This of course means that you'd be relying on your users to have
VBA enabled, which may not be the case. An example would be:

Add the following to your ThisDocument class

Sub ToggleCustPropsWindow(shp As Shape)
Application.DoCmd (1658)
End Sub

....then in your ShapeSheet, add the following function to the EventDblClick
cell:

CALLTHIS("ThisDocument.ToggleCustPropsWindow",)

Hope that helps.

Best regards

John


John Goldsmith (Visio MVP)
www.visualSignals.typepad.co.uk
www.visualSignals.co.uk