Thread: save comments to a worksheet

Hello: I want to save my comments in a worksheet format to view. I know how
to print the comments, but I actually need to capture them in a cell format.
Thus, taking them from the comment format and inserting it into a cell in a
worksheet. How would I accomplish this?

Thanks in advance,
Christina

You can do this with programming. There's sample code here:

http://www.contextures.com/xlcomment...ml#CopyToSheet

IM_CRice wrote:
> Hello: I want to save my comments in a worksheet format to view. I know how
> to print the comments, but I actually need to capture them in a cell format.
> Thus, taking them from the comment format and inserting it into a cell in a
> worksheet. How would I accomplish this?

--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

Debra, thanks for the info!! I'm going to try it out!!! Also, thanks for
the quick response to my post!!!

"Debra Dalgleish" wrote:

> You can do this with programming. There's sample code here:
>
> http://www.contextures.com/xlcomment...ml#CopyToSheet
>
> IM_CRice wrote:
> > Hello: I want to save my comments in a worksheet format to view. I know how
> > to print the comments, but I actually need to capture them in a cell format.
> > Thus, taking them from the comment format and inserting it into a cell in a
> > worksheet. How would I accomplish this?
>
> --
> Debra Dalgleish
> Excel FAQ, Tips & Book List
> http://www.contextures.com/tiptech.html
>
>

Christina

Code from Debra Dalgleish to list comments on a new sheet.

Sub ListComms()
Dim Cell As Range
Dim Sh As Worksheet
Dim csh As Worksheet
Set csh = ActiveWorkbook.Worksheets.Add
csh.Name = "Comments"
For Each Sh In ActiveWorkbook.Worksheets
If Sh.Name <> csh.Name Then
For Each Cell In Sh.UsedRange
If Not Cell.Comment Is Nothing Then
With csh.Range("a65536").End(xlUp).Offset(1, 0)
.Value = Sh.Name & " " & Cell.Address
.Offset(0, 1).Value = Cell.Comment.text
End With
End If
Next Cell
End If
Next Sh
End Sub

If not familiar with VBA and macros, see David McRitchie's site for more on
"getting started".

http://www.mvps.org/dmcritchie/excel/getstarted.htm

In the meantime..........

First...create a backup copy of your original workbook.

To create a General Module, hit ALT + F11 to open the Visual Basic Editor.

Hit CRTL + R to open Project Explorer.

Find your workbook/project and select it.

Right-click and Insert>Module. Paste the code in there. Save the
workbook and hit ALT + Q to return to your workbook.

Run the macro by going to Tool>Macro>Macros.


Gord Dibben Excel MVP


On Thu, 6 Jan 2005 11:33:03 -0800, "IM_CRice"
<IM_CRice@discussions.microsoft.com> wrote:

>Hello: I want to save my comments in a worksheet format to view. I know how
>to print the comments, but I actually need to capture them in a cell format.
>Thus, taking them from the comment format and inserting it into a cell in a
>worksheet. How would I accomplish this?
>
>Thanks in advance,
>Christina

Gord,

Thank you!! I was absolutely having some problems with the macros, as I am
not real familiar with them. Reading through your post, it provides more
explanation. I'm going to follow it now and will see if I can get it to work.

Thanks so much for your response!! Very, Very helpful!!

Christina

"Gord Dibben" wrote:

> Christina
>
> Code from Debra Dalgleish to list comments on a new sheet.
>
> Sub ListComms()
> Dim Cell As Range
> Dim Sh As Worksheet
> Dim csh As Worksheet
> Set csh = ActiveWorkbook.Worksheets.Add
> csh.Name = "Comments"
> For Each Sh In ActiveWorkbook.Worksheets
> If Sh.Name <> csh.Name Then
> For Each Cell In Sh.UsedRange
> If Not Cell.Comment Is Nothing Then
> With csh.Range("a65536").End(xlUp).Offset(1, 0)
> .Value = Sh.Name & " " & Cell.Address
> .Offset(0, 1).Value = Cell.Comment.text
> End With
> End If
> Next Cell
> End If
> Next Sh
> End Sub
>
> If not familiar with VBA and macros, see David McRitchie's site for more on
> "getting started".
>
> http://www.mvps.org/dmcritchie/excel/getstarted.htm
>
> In the meantime..........
>
> First...create a backup copy of your original workbook.
>
> To create a General Module, hit ALT + F11 to open the Visual Basic Editor.
>
> Hit CRTL + R to open Project Explorer.
>
> Find your workbook/project and select it.
>
> Right-click and Insert>Module. Paste the code in there. Save the
> workbook and hit ALT + Q to return to your workbook.
>
> Run the macro by going to Tool>Macro>Macros.
>
>
> Gord Dibben Excel MVP
>
>
> On Thu, 6 Jan 2005 11:33:03 -0800, "IM_CRice"
> <IM_CRice@discussions.microsoft.com> wrote:
>
> >Hello: I want to save my comments in a worksheet format to view. I know how
> >to print the comments, but I actually need to capture them in a cell format.
> >Thus, taking them from the comment format and inserting it into a cell in a
> >worksheet. How would I accomplish this?
> >
> >Thanks in advance,
> >Christina
>
>

Thanks for the feedback.

Gord

On Fri, 7 Jan 2005 11:31:01 -0800, "IM_CRice"
<IM_CRice@discussions.microsoft.com> wrote:

>Gord,
>
>Thank you!! I was absolutely having some problems with the macros, as I am
>not real familiar with them. Reading through your post, it provides more
>explanation. I'm going to follow it now and will see if I can get it to work.
>
>Thanks so much for your response!! Very, Very helpful!!
>
>Christina
>
>"Gord Dibben" wrote:
>
>> Christina
>>
>> Code from Debra Dalgleish to list comments on a new sheet.
>>
>> Sub ListComms()
>> Dim Cell As Range
>> Dim Sh As Worksheet
>> Dim csh As Worksheet
>> Set csh = ActiveWorkbook.Worksheets.Add
>> csh.Name = "Comments"
>> For Each Sh In ActiveWorkbook.Worksheets
>> If Sh.Name <> csh.Name Then
>> For Each Cell In Sh.UsedRange
>> If Not Cell.Comment Is Nothing Then
>> With csh.Range("a65536").End(xlUp).Offset(1, 0)
>> .Value = Sh.Name & " " & Cell.Address
>> .Offset(0, 1).Value = Cell.Comment.text
>> End With
>> End If
>> Next Cell
>> End If
>> Next Sh
>> End Sub
>>
>> If not familiar with VBA and macros, see David McRitchie's site for more on
>> "getting started".
>>
>> http://www.mvps.org/dmcritchie/excel/getstarted.htm
>>
>> In the meantime..........
>>
>> First...create a backup copy of your original workbook.
>>
>> To create a General Module, hit ALT + F11 to open the Visual Basic Editor.
>>
>> Hit CRTL + R to open Project Explorer.
>>
>> Find your workbook/project and select it.
>>
>> Right-click and Insert>Module. Paste the code in there. Save the
>> workbook and hit ALT + Q to return to your workbook.
>>
>> Run the macro by going to Tool>Macro>Macros.
>>
>>
>> Gord Dibben Excel MVP
>>
>>
>> On Thu, 6 Jan 2005 11:33:03 -0800, "IM_CRice"
>> <IM_CRice@discussions.microsoft.com> wrote:
>>
>> >Hello: I want to save my comments in a worksheet format to view. I know how
>> >to print the comments, but I actually need to capture them in a cell format.
>> >Thus, taking them from the comment format and inserting it into a cell in a
>> >worksheet. How would I accomplish this?
>> >
>> >Thanks in advance,
>> >Christina
>>
>>

Thanks for the feedback.

Gord

On Fri, 7 Jan 2005 11:31:01 -0800, "IM_CRice"
<IM_CRice@discussions.microsoft.com> wrote:

>Gord,
>
>Thank you!! I was absolutely having some problems with the macros, as I am
>not real familiar with them. Reading through your post, it provides more
>explanation. I'm going to follow it now and will see if I can get it to work.
>
>Thanks so much for your response!! Very, Very helpful!!
>
>Christina
>
>"Gord Dibben" wrote:
>
>> Christina
>>
>> Code from Debra Dalgleish to list comments on a new sheet.
>>
>> Sub ListComms()
>> Dim Cell As Range
>> Dim Sh As Worksheet
>> Dim csh As Worksheet
>> Set csh = ActiveWorkbook.Worksheets.Add
>> csh.Name = "Comments"
>> For Each Sh In ActiveWorkbook.Worksheets
>> If Sh.Name <> csh.Name Then
>> For Each Cell In Sh.UsedRange
>> If Not Cell.Comment Is Nothing Then
>> With csh.Range("a65536").End(xlUp).Offset(1, 0)
>> .Value = Sh.Name & " " & Cell.Address
>> .Offset(0, 1).Value = Cell.Comment.text
>> End With
>> End If
>> Next Cell
>> End If
>> Next Sh
>> End Sub
>>
>> If not familiar with VBA and macros, see David McRitchie's site for more on
>> "getting started".
>>
>> http://www.mvps.org/dmcritchie/excel/getstarted.htm
>>
>> In the meantime..........
>>
>> First...create a backup copy of your original workbook.
>>
>> To create a General Module, hit ALT + F11 to open the Visual Basic Editor.
>>
>> Hit CRTL + R to open Project Explorer.
>>
>> Find your workbook/project and select it.
>>
>> Right-click and Insert>Module. Paste the code in there. Save the
>> workbook and hit ALT + Q to return to your workbook.
>>
>> Run the macro by going to Tool>Macro>Macros.
>>
>>
>> Gord Dibben Excel MVP
>>
>>
>> On Thu, 6 Jan 2005 11:33:03 -0800, "IM_CRice"
>> <IM_CRice@discussions.microsoft.com> wrote:
>>
>> >Hello: I want to save my comments in a worksheet format to view. I know how
>> >to print the comments, but I actually need to capture them in a cell format.
>> >Thus, taking them from the comment format and inserting it into a cell in a
>> >worksheet. How would I accomplish this?
>> >
>> >Thanks in advance,
>> >Christina
>>
>>