Sorry, I misunderstood your request. This UDF will display comments in source
sheet (Sheet1) as cell contents in destination sheet (Sheet2):
Function CommText(sourcesheet, cellrow, cellcol)
If Worksheets(sourcesheet).Cells(cellrow, cellcol).Comment Is Nothing Then
CommText = ""
Else
CommText = Worksheets(sourcesheet).Cells(cellrow,
cellcol).Comment.Text
End If
End Function
Enter in A1 in Sheet2
=CommText("Sheet1",ROW(),COLUMN())
and fill it right and down as required!
Regards,
Stefi
€˛shanelaura€¯ ezt Ć*rta:
Thank you for the reply
Not quite the result I'm looking for
I would like to see the comments added to a blank spread not in comment
form but in text form if that makes sense
--
shanelaura
------------------------------------------------------------------------
shanelaura's Profile: http://www.excelforum.com/member.php...o&userid=33898
View this thread: http://www.excelforum.com/showthread...hreadid=536733