Comments not a end of doc in Word 2003

[FUBARinSFO]

Hi:

For some reason my comments are not printing at the end of the
document, using Word 2003. I've disabled balloons in Tools | Options
| Track Changes.

I know this is how comments used to work before the addition of these
ballons. Was that functionality dropped in the transition from Word
2000 to Word 2003, or is there some setting that will enable this that
I've overlooked?. Otherwise all I've got are tags in the text for the
comment but no comments themselves.

Thanks in advance.

-- Roy Zider

Microsoft Office Word 2003 SP3 v.11.0 (build 8237)

 

[Stefan Blom]

Did you remember to choose "Document showing markup" in the File | Print
dialog box when printing?

 

[Doug Robbins - Word MVP on news.microsoft.com]

If you run a macro with the following code, it will insert the name of the
author of each comment, the page on which the comment appears and the text
of each comment at the end of the document.

Dim acomment As Comment
With ActiveDocument
.Range.InsertAfter "Comments" & vbCr
For Each acomment In .Comments
.Range.InsertAfter acomment.Author & " - Page " &
acomment.Reference.Information(wdActiveEndPageNumber) & " - " &
acomment.Range & vbCr
Next acomment
End With


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP, originally posted via msnews.microsoft.com

 

[FUBARinSFO]

Stefan:

I'm trying to print it without the balloon in the margin, not with it
-- I want the comment at the bottom of the page/end of the docuement,
the way they used to print in Word 2000 (per my recollection). I
tried your suggestion, which it seems to me enforces the print of the
balloon In any case it did not print at the end of the doc. MIght
there be another setting you could suggest?

Doug:

Indeed it does. Do you have any way to hook the comment into the
comment text hook that is in the document? Your code outputs the
comment author name, whereas the comment hook/note/tag embedded in the
text is the author's intials. (In my case, "Roy Zider" rather than
'lsz').

Thanks.

-- Roy Zider

 

[Stefan Blom]

I just tried my suggestion again and it didn't seem to work. I guess you
will have to use Doug's macro instead.

 

[FUBARinSFO]

Stefan:

Thanks for confirming that.

-- Roy

 

[Doug Robbins - Word MVP on news.microsoft.com]

Use:

Dim acomment As Comment
With ActiveDocument
.Range.InsertAfter "Comments" & vbCr
For Each acomment In .Comments
.Range.InsertAfter acomment.Initial & " - Page " & _
acomment.Reference.Information(wdActiveEndPageNumber) & " - " & _
acomment.Range & vbCr
Next acomment
End With


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP, originally posted via msnews.microsoft.com

 

[FUBARinSFO]

Doug:

acomment.Initial <-- that's what I was looking for.

Don't have the Word object model handy, so that is very helpful.

Thanks.

-- Roy