Shape Property Example
This example selects comment two on the active sheet.
ActiveSheet.Comments(2).Shape.Select