Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Convert footntoes to plain text
Is there any way to copy footntoes to a new document and kee their numbers?
Whenever I try to copy it all the footnote numbers revert to one. |
#2
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Convert footntoes to plain text
What exactly are you trying to do? If you just change your footnotes
to endnotes, they'll gather at the end, and you can put a page break before the first one and print them out as a unit. Or, you could move all the notes to a new docuiment and turn on paragraph numbering. On Jul 29, 2:49 pm, Fred Goldman wrote: Is there any way to copy footntoes to a new document and kee their numbers? Whenever I try to copy it all the footnote numbers revert to one. |
#3
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Convert footntoes to plain text
I need to move them to a new docuemnt. Using numbering won't work because
most of the footnotes have multiple paragraphs. "grammatim" wrote: What exactly are you trying to do? If you just change your footnotes to endnotes, they'll gather at the end, and you can put a page break before the first one and print them out as a unit. Or, you could move all the notes to a new docuiment and turn on paragraph numbering. On Jul 29, 2:49 pm, Fred Goldman wrote: Is there any way to copy footntoes to a new document and kee their numbers? Whenever I try to copy it all the footnote numbers revert to one. |
#4
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Convert footntoes to plain text
What are you moving? If you select the footnote reference in the text,
Copy it, and Paste it into the new document, the whole footnote will simply appear as the next numbered footnote in the sequence. (Unless, of course, you have turned on restart numbering on each page!) On Jul 29, 3:22 pm, Fred Goldman wrote: I need to move them to a new docuemnt. Using numbering won't work because most of the footnotes have multiple paragraphs. "grammatim" wrote: What exactly are you trying to do? If you just change your footnotes to endnotes, they'll gather at the end, and you can put a page break before the first one and print them out as a unit. Or, you could move all the notes to a new docuiment and turn on paragraph numbering. On Jul 29, 2:49 pm, Fred Goldman wrote: Is there any way to copy footntoes to a new document and kee their numbers? Whenever I try to copy it all the footnote numbers revert to one. |
#5
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Convert footntoes to plain text
Right, but I don't want it to be a footnote anymore, so I put the cursor in
the footnotes pane and press Ctrl+A. Then I copy them. When pasting them into a new doc all the footnotes start with one. I would like to import these footnotes as a totally seperate text into a layout program, but I don't to have to renumber them. "grammatim" wrote: What are you moving? If you select the footnote reference in the text, Copy it, and Paste it into the new document, the whole footnote will simply appear as the next numbered footnote in the sequence. (Unless, of course, you have turned on restart numbering on each page!) On Jul 29, 3:22 pm, Fred Goldman wrote: I need to move them to a new docuemnt. Using numbering won't work because most of the footnotes have multiple paragraphs. "grammatim" wrote: What exactly are you trying to do? If you just change your footnotes to endnotes, they'll gather at the end, and you can put a page break before the first one and print them out as a unit. Or, you could move all the notes to a new docuiment and turn on paragraph numbering. On Jul 29, 2:49 pm, Fred Goldman wrote: Is there any way to copy footntoes to a new document and kee their numbers? Whenever I try to copy it all the footnote numbers revert to one. |
#6
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Convert footntoes to plain text
Sorry, I'm not understanding. They were footnotes; you don't want them
to be footnotes; yet you want them to be numbered. On Jul 29, 6:28 pm, Fred Goldman wrote: Right, but I don't want it to be a footnote anymore, so I put the cursor in the footnotes pane and press Ctrl+A. Then I copy them. When pasting them into a new doc all the footnotes start with one. I would like to import these footnotes as a totally seperate text into a layout program, but I don't to have to renumber them. "grammatim" wrote: What are you moving? If you select the footnote reference in the text, Copy it, and Paste it into the new document, the whole footnote will simply appear as the next numbered footnote in the sequence. (Unless, of course, you have turned on restart numbering on each page!) On Jul 29, 3:22 pm, Fred Goldman wrote: I need to move them to a new docuemnt. Using numbering won't work because most of the footnotes have multiple paragraphs. "grammatim" wrote: What exactly are you trying to do? If you just change your footnotes to endnotes, they'll gather at the end, and you can put a page break before the first one and print them out as a unit. Or, you could move all the notes to a new docuiment and turn on paragraph numbering. On Jul 29, 2:49 pm, Fred Goldman wrote: Is there any way to copy footntoes to a new document and kee their numbers? Whenever I try to copy it all the footnote numbers revert to one. |
#7
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Convert footntoes to plain text
I don't thing there is any simple way to achieve this, but a macro should do
the trick. Run the following on the document that contains the footnotes. It will write the footnotes to a new document. Sub CopyFootnotes() Dim sDoc As Document Dim tDoc As Document Dim sId As String Dim fText As String Set sDoc = ActiveDocument Set tDoc = Documents.Add For i = 1 To sDoc.Footnotes.Count sId = sDoc.Footnotes(i).Index sText = sDoc.Footnotes(i).Range.Text tDoc.Activate With Selection .Style = "Footnote Text" .Font.Superscript = True .TypeText sId & " " .Font.Superscript = False .TypeText sText & vbCr End With sDoc.Activate Next i tDoc.Activate End Sub http://www.gmayor.com/installing_macro.htm -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org Fred Goldman wrote: Right, but I don't want it to be a footnote anymore, so I put the cursor in the footnotes pane and press Ctrl+A. Then I copy them. When pasting them into a new doc all the footnotes start with one. I would like to import these footnotes as a totally separate text into a layout program, but I don't to have to renumber them. "grammatim" wrote: What are you moving? If you select the footnote reference in the text, Copy it, and Paste it into the new document, the whole footnote will simply appear as the next numbered footnote in the sequence. (Unless, of course, you have turned on restart numbering on each page!) On Jul 29, 3:22 pm, Fred Goldman wrote: I need to move them to a new docuemnt. Using numbering won't work because most of the footnotes have multiple paragraphs. "grammatim" wrote: What exactly are you trying to do? If you just change your footnotes to endnotes, they'll gather at the end, and you can put a page break before the first one and print them out as a unit. Or, you could move all the notes to a new docuiment and turn on paragraph numbering. On Jul 29, 2:49 pm, Fred Goldman wrote: Is there any way to copy footntoes to a new document and kee their numbers? Whenever I try to copy it all the footnote numbers revert to one. |
#8
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Convert footntoes to plain text
Very cool!!!
Thank you very much for writing me that macro! Is there any way to get it to keep the formatting, like bold italics and character styles when moving the footnotes to the new doc? I was able to read how you looped through the footnotes, but I couldn't understand the rest... |
#9
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Convert footntoes to plain text
Try
Sub CopyFootnotes() Dim sDoc As Document Dim tDoc As Document Dim sId As String Set sDoc = ActiveDocument Set tDoc = Documents.Add For i = 1 To sDoc.Footnotes.Count sId = sDoc.Footnotes(i).Index sDoc.Footnotes(i).Range.Select Selection.Copy tDoc.Activate With Selection .Style = "Footnote Text" .Font.Superscript = True .TypeText sId & " " .Font.Superscript = False .Paste .TypeParagraph End With sDoc.Activate Next i tDoc.Activate End Sub -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org Fred Goldman wrote: Very cool!!! Thank you very much for writing me that macro! Is there any way to get it to keep the formatting, like bold italics and character styles when moving the footnotes to the new doc? I was able to read how you looped through the footnotes, but I couldn't understand the rest... |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How do I convert Word bullet points to plain text? | Microsoft Word Help | |||
How to convert Western European Plain text doc to US Word doc. | Microsoft Word Help | |||
how do i convert a plain text email to an html email? | Microsoft Word Help | |||
How do I convert automatic heading numbers to plain text? | Page Layout | |||
Convert hyperlinked Table of Contents to plain text | Tables |