Is anyone having problems with footnotes converting??

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Specifically, I have a document that was created and saved in an older
version of Word. I open the document in Windows XP/Office 2003 and none of
the footnotes will convert??

This is happening all over the firm - any older documents won't receive new
footnotes.
 
Try running the following macro and see if it solves the problem.

' Macro created by Doug Robbins to re-insert Footnotes

Dim afnRange As Range, afntext As String, i As Integer

For i = 1 To ActiveDocument.Footnotes.Count

ActiveDocument.Footnotes(i).Reference.Select

Selection.Characters(1).Select

If Not Selection.Style = "Footnote Reference" Then

While Not Selection.Style = "Footnote Reference"

Selection.Collapse wdCollapseStart

Selection.MoveLeft wdCharacter

Selection.Characters(1).Select

Wend

Selection.Delete

End If

Set afnRange = ActiveDocument.Footnotes(i).Range

afntext = afnRange.Text

ActiveDocument.Footnotes(i).Delete

ActiveDocument.Footnotes.Add Range:=Selection.Range, Text:=afntext



Next i

--
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
 
Back
Top