Print Page - eventdblclick->show shapedata of different shape

Title: eventdblclick->show shapedata of different shape
Post by: novski on May 05, 2014, 07:03:20 AM

hi
im trying to show the shapedata of a second shape by dubbleclicking the first.
how can i do this?
thanks
novski

Title: Re: eventdblclick->show shapedata of different shape
Post by: Thomas Winkel on May 05, 2014, 09:04:18 AM

Hi,

I guess you have to do this with code:

Code Select


Public Sub OpenShapeData()
    Dim shp As Visio.Shape
    Set shp = ActiveDocument.Pages(1).Shapes(1)
    shp.Application.DoCmd (visCmdFormatCustPropEdit)
End Sub

And in EventDblClick:

Code Select


=RUNMACRO("ModuleName.OpenShapeData","ProjectName")

Showing the data of the same shape is possible without code:

Code Select


=DoCmd(1312)

Visio Guy

Visio Discussions => ShapeSheet & Smart Shapes => Topic started by: novski on May 05, 2014, 07:03:20 AM