Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
reformat endnote
word formatted my endnotes into superscripted numbers. i need to change
those into regular (no superscript) numbers surrounded by brackets. can somebody please help me with this? thank you. |
#2
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
reformat endnote
If you run the following macro, it will convert the endnotes to textnotes at
the end of the document and it would put brackets around the endnote reference. You should save the document before running this macro and save it with a new name after running it in case you want to go back and make changes to the document. ' Macro created 29/09/99 by Doug Robbins to replace endnotes with textnotes at end of document ' to put brackets around the endnote reference in the body of the document. ' 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 .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. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP "jane a." jane wrote in message ... word formatted my endnotes into superscripted numbers. i need to change those into regular (no superscript) numbers surrounded by brackets. can somebody please help me with this? thank you. |
#3
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
reformat endnote
thank you so much!
-j "Doug Robbins - Word MVP" wrote: If you run the following macro, it will convert the endnotes to textnotes at the end of the document and it would put brackets around the endnote reference. You should save the document before running this macro and save it with a new name after running it in case you want to go back and make changes to the document. ' Macro created 29/09/99 by Doug Robbins to replace endnotes with textnotes at end of document ' to put brackets around the endnote reference in the body of the document. ' 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 .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. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP "jane a." jane wrote in message ... word formatted my endnotes into superscripted numbers. i need to change those into regular (no superscript) numbers surrounded by brackets. can somebody please help me with this? thank you. |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can I Format Endnote References Differently in Body and Endnote Li | Microsoft Word Help | |||
reformat paragraphs | Microsoft Word Help | |||
unwanted reformat | Microsoft Word Help | |||
How do I reformat an existing document? | Page Layout | |||
How do I go from an endnote to the text where I placed the endnote | Microsoft Word Help |