I used to control Cell Comments with the below code....

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.DisplayFormulaBar = True
If ActiveCell.Column = 2 Then
If ActiveCell.Row 2 Then
If Len(ActiveCell.Value) 0 Then
SendKeys "%ie~"
End If
End If
End If
End Sub

This code now inserts a cell rather then show the cell's comments
( under Excel 2003 ) can any one help please?
I find the new menu tools rather awkward and hidden when searching
beyond the basic tools....