Table of content, endnotes

[Stefan]

Hello.

I am trying to solve the following problem. My document is organised
like this: (Word 97)

1. Chapter 1
2. Chapter 2
3. Chapter 3
3.1 Chapter 3.1
3.2 Chapter 3.2
3.3 Endnotes for Chapter 3 only
4 Chapter 4
5 References (Endnotes for complete document without chapter 3 )
6 Table of figures
7 APPENDIX
7.1 Appendix A

Chapter 3 is a separate document with its own references (endnotes),
table of content, table of figures -and should not be included in the
referenece list in 5, table of figures in 6. Is there any way to do
this?
Maybe can the references (endnotes and figure-numbers) be hardcoded so
that they do not change any more. Otherwise they will be picket up in
the reference list in chapter 5. Same problem with figures.

I can not add any chapter after chapter 5 (list of endnotes - reference
list)
I tried to generate a new break (section) but this can only be done
before that section.

Thank you for any hints!

Regards

Stefan

Sent via Deja.com http://www.deja.com/
Before you buy.

[Doug Robbins]

Hi Stefan,

The following macro will convert endnotes and their references in the
document to text:

' Macro created 29/09/99 by Doug Robbins to replace endnotes with textnotes
at end of document
' to replace the endnote reference in the body of the document with a
superscript number.
'
Dim aendnote As Endnote
For Each aendnote In ActiveDocument.Endnotes
ActiveDocument.Range.InsertAfter vbCr & aendnote.Index & vbTab &
aendnote.Range
aendnote.Reference.InsertBefore "a" & aendnote.Index & "a"
Next aendnote
For Each aendnote In ActiveDocument.Endnotes
aendnote.Reference.Delete
Next aendnote
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find.Replacement.Font
.Superscript = True
End With
With Selection.Find
.Text = "(a)([0-9]{1,})(a)"
.Replacement.Text = "\2"
.Forward = True
.Wrap = wdFindContinue
.Format = True
.MatchWildcards = True
End With
Selection.Find.Execute Replace:=wdReplaceAll

Hope this helps,
Doug Robbins - Word MVP
Please post any follow-up to the Newsgroups so that others may benefit
therefrom or contribute thereto.
Stefan <Stefan...@Bigfoot.com> wrote in message
news:8giq44$s7k$1...@nnrp1.deja.com...

[Stefan]

Doug,
Thank you for your reply and the macro.

This works fine for the endnotes.

Is there also a possibility to transfer all cross-links, captions,
Headings (Heading 1, Heading 2, ... ),... basically everything what is
useful for large documents, to text?

Due to the second document is within the main document, the table of
content, table of figures,... is affected by that document. All tables,
and Indexes should ignore the embedded document!

I hope that there is a solution for that problem?

Thanks for any help!

[Doug Robbins]

Hi Stefan,

Use ActiveDocument.ConvertNumbersToText to convert the numbering in the
document to text.

ActiveDocument.Fields.Unlink will unlink the entries in the tables of
contents from their source.

Hope this helps,
Doug Robbins - Word MVP
Please post any follow-up to the Newsgroups so that others may benefit
therefrom or contribute thereto.
Stefan <Stefan...@Bigfoot.com> wrote in message

news:8gj891$5oh$1...@nnrp1.deja.com...