This is my code
Sub ClearShapeonPage()
Dim shp As Visio.Shape
Dim I As Long, N As Long
N = ActivePage.Shapes.Count
For I = N To 1 Step -1
ActivePage.Shapes(I).Delete
Next
End Sub
Sub FirstPage()
'Enable diagram services
Dim DiagramServices As Integer...
When edit mode , I can double click the shape and method (that I call when click shape) is running. But when in running mode (F5) I double the shape but nothing happen
What should I do ?
Thanks