Copying comments text to a cell using vba

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Is it possible to copy the contents of a comments box to a cell on a
different sheet using VBA?
 
Hi TommoUK,

Try something like:

'=============>>
Public Sub Tester001()
Dim SrcRng As Range
Dim destRng As Range
Dim cmt As Comment

Set SrcRng = ThisWorkbook.Sheets("Sheet1").Range("A1")
Set destRng = ThisWorkbook.Sheets("Sheet2").Range("B1")

Set cmt = SrcRng.Comment

destRng.Value = cmt.Text

Set cmt = Range("A1").Comment

End Sub
'<<=============
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Copying a Picture From Cell Comment 0
Excel Import Comments 3
Code to add comments to selected cells within a selected range 30
Insert comment into cell 4
Formulas In Cell Comments 9
Use "Tab" within a cell comment 2
Copy the contents of a range of cells to a single comment(indicator)? 2
Comment Box Placement 1

Back
Top