Text from a comment box into a cell
You can try the below UDF. To try this launch VBE using Alt+F11. Insert
module and paste the below code. Save and close VBE. Get back to workbook.
=GetComment(A1)
Function GetComment(varRange As Range) As String
For Each c In varRange
If Not c.Comment Is Nothing Then
GetComment = GetComment & c.Comment.Text & ","
End If
Next
End Function
If this post helps click Yes
---------------
Jacob Skaria
"MFS" wrote:
Hi, is there any solution to extract the text written in a comment box to a
specific cell
I tried the following but this message #name? appeared
Select the cell which has the comment
Go to InsertName (Define Name in formulas tap) a window will appear
Now insert the following formula in the "Refers to" box -
get.object(12,"comment 1") and give it a name, say trial
In any cell (say A5) where you want to insert the contents of the comments
box, say =trial.
Please check where is my mistake, note that I have Office 2007.
--
MFS22
|