PDA

View Full Version : Solved: Get cell comment text in another cell



ioncila
05-24-2010, 08:07 AM
Hi

For reasons that may not be reasonable to your sense or to this forum, I was wondering if there is a formula or what else that everytime you select or pass the cursor over each cell of a certain excel table, the comment text that pops up as we know would appear instead in a cell in the bottom of that table.

This is just to add some different esthetics to the table, not a priority thing.

Thanks
Ioncila

lynnnow
05-24-2010, 08:38 AM
Hi Ioncila,

I already am using something like this:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A1").Clear
If Not ActiveCell.Comment Is Nothing Then
Range("A1").Value = ActiveCell.Comment.Text
Range("A1").Interior.ColorIndex = 5
Range("A1").Font.ColorIndex = 2
Range("A1").Font.Bold = True
End If
End Sub


This will display the cell comment at Cell A1, not the bottom of the table. You need to insert this in the worksheet module.

However, I don't like to use it much since the copy/paste function does not work whenever you change the cell selection on the sheet.

HTH.

Lincoln

ioncila
05-24-2010, 09:46 AM
Thank you

It works.

Ioncila