Retrieving data from cell Comments

macropod · #4 06-16-2014, 03:04 AM

Extracting cell comments is quite simple. For example:

Code:

Sub ExportComments()
  Dim InputRange As Range, StrCmnt as String
  Set InputRange = Application.InputBox (prompt:= "What Range?",Type:=8)
  On Error Resume Next
  For Each cell in InputRange
    StrCmnt = StrCmnt & Cell.Address & ": " & Mid(Cell.Comment.Text, Len(Cell.Comment.Author) + 3) & vbCr
  Next
MsgBox StrCmnt
End sub

This macro will prompt for a range of cells from which to extract the comments. It will then display those comments in a message box, with the cell addresses.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Copying data from one cell to another where condition is third cell	fairyca	Excel	4	03-30-2014 08:22 AM
Retrieving data from a list or database.	Vic01	Word	14	11-14-2013 12:46 AM
Retrieving deleted data	charles	Outlook	0	12-23-2012 10:58 PM
Copy all comments & cell contents (i.e. data) to word?	IanM	Excel	0	07-03-2010 11:14 PM
Cell Comments in a Protected spreadsheet	dmgerber	Excel	1	06-06-2010 05:10 AM