Hello, I am writing an application where I need to detect witch shape in a
group is selected.

I need to be able to change the text in a shape, and the name of the shape.
This is not a problem if the selected shape is not a part of a group. I need
to be able to detect witch of the shapes in a group is curently selected.

Thanks...

Raist,
Take a look at this example:
'===============================================
Sub ShapeSelectionWithinGroup()
With ActiveWindow.Selection
If .ShapeRange(1).Type = msoGroup Then
If .HasChildShapeRange Then
'First shape in the selection within the group
With .ChildShapeRange(1)
.TextFrame.TextRange.Text = "Test"
End With
End If
End If
End With
End Sub
'===============================================

--
Regards,
Shyam Pillai

Image Importer Wizard: http://skp.mvps.org/iiw.htm



"Raist via OfficeKB.com" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> Hello, I am writing an application where I need to detect witch shape in a
> group is selected.
>
> I need to be able to change the text in a shape, and the name of the
> shape.
> This is not a problem if the selected shape is not a part of a group. I
> need
> to be able to detect witch of the shapes in a group is curently selected.
>
> Thanks...