Thanks !!! JE

JE McGimpsey wrote:
You could use a User Defined Function:

Public Function GetComment(Target As Excel.Range) As String
On Error Resume Next
GetComment = Target(1).Comment.Text
On Error GoTo 0
End Function

Use as

A2: =GetComment(A1)

If you're not familiar with UDFs see

http://www.mvps.org/dmcritchie/excel/getstarted.htm

Hi

[quoted text clipped - 9 lines]

Norman


--
Message posted via http://www.officekb.com