curve and contourgroup effect

[shark]

Hi
Here's a question - i have a curve [shape1] and contourgroup [shape2] that linked with it.
[shape1].Effect.ContourEffect.Contour.ContourGroup points to [shape2]. So I can get [shape2] using a [shape1]. And how can I get a [shape1] if I have a [shape2] only ? Need to check all shapes and compares .Effect..Contourgroup or may be [shape2] have any property that points to source [shape1] ?

Thanks in advance

[runflacruiser]

Hi.
I hope I'm not oversimplifying this.
Create a circle and add a single outer contour.

Debug with this code.

Sub test()

ActivePage.Shapes.FindShapes(, cdrContourGroupShape).CreateSelection
ActiveShape.Previous.CreateSelection

End Sub

~John