Coping cell comments to another cell
Hi SL,
You're right, there's no need to specify a range to act on as the code
works on every cell in the active worksheet with a comment in it (or
it is supposed too!)
See if the following will work; you need to highlight the cells
containing comments before running it.
Sub Comment_Text_In_Cell_To_Right()
Dim Cell As Object
On Error Resume Next
For Each Cell In Selection
If Cell.Comment = True Then
Cell.Offset(0, 1) = Cell.Comment.Text
End If
Next Cell
On Error GoTo 0
End Sub
On 25 Dec, 11:35, Still Learning <Still
wrote:
No it is not. *I'm assuming that the macro doesn't need anything typed into
it (ie ranges (a1:b4) or sheet names or anythng).
Thanks for trying to help.
PS, is there somewhere that lists what these comands do? *(as I said, I'm
still learning)
"Joshua Fandango" wrote:
Community Message Not Available- Hide quoted text -
- Show quoted text -
|