Consulting

Results 1 to 3 of 3

Thread: Solved: Get cell comment text in another cell

  1. #1
    VBAX Contributor
    Joined
    Mar 2009
    Location
    Porto, Portugal
    Posts
    180
    Location

    Solved: Get cell comment text in another cell

    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

  2. #2
    VBAX Tutor lynnnow's Avatar
    Joined
    Jan 2005
    Location
    Mumbai, Maharashtra, India
    Posts
    299
    Location
    Hi Ioncila,

    I already am using something like this:
    [VBA]
    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
    [/VBA]

    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

  3. #3
    VBAX Contributor
    Joined
    Mar 2009
    Location
    Porto, Portugal
    Posts
    180
    Location
    Thank you

    It works.

    Ioncila

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •