I have 600+ shapes in a spreadsheet. Half are the little red corner
associated with comments and half are small pictures in the same cell. How
can I select the picture in a given cell from VB?
--
Thanks,
Uwe

Hovering over some row or hovering over some cell?

Uwe wrote:

I have 600+ shapes in a spreadsheet. Half are the little red corner
associated with comments and half are small pictures in the same cell. How
can I select the picture in a given cell from VB?
--
Thanks,
Uwe

--

Dave Peterson

You could use the shape's name to distinguish Comment from other
shapes.
The following example selects the first shape in F2 whose name does
not start with "Comment"...

Option Explicit
Sub select_shape()
Dim Shp As Shape
For Each Shp In ActiveSheet.Shapes
If Shp.TopLeftCell = Range("F2") _
And Left(Shp.Name, 7) < "Comment" Then
Shp.Select
End If
Next
End Sub

Ken Johnson