converting html-tagged text to footnotes

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Moshe Wisnefsky - 11 Jul 2004 12:10 GMT

Hi everybody!

I have a document with citation-sources between html tags (e.g.,
<fn>Book, p. x</fn>) and I need to convert all of these to regular
footnotes. Is there a way? Or, alternatively, is there a more specific
user group I should post this message to?

Thanks,

Moshe

Reply to this Message

Doug Robbins - 11 Jul 2004 11:32 GMT

The following code in a macro will do it:

' Throw-away macro createded 7/11/2004 by Doug Robbins
'
Dim fntext As String
Selection.HomeKey wdStory
Selection.Find.ClearFormatting
With Selection.Find
Do While .Execute(FindText:="\<fn\>*\</fn\>", MatchWildcards:=True,
Wrap:=wdFindContinue, Forward:=True) = True
fntext = Selection.Range.Text
fntext = Mid(fntext, 5, Len(fntext) - 9)
Selection.Delete
ActiveDocument.Footnotes.Add Range:=Selection.Range, Text:=fntext
Loop
End With

Signature

Please respond to the Newsgroup for the benefit of others who may be
interested. Questions sent directly to me will only be answered on a paid
consulting basis.

Hope this helps,
Doug Robbins - Word MVP

> Hi everybody!
>
[quoted text clipped - 6 lines]
>
> Moshe

Reply to this Message

Moshe Wisnefsky - 12 Jul 2004 23:52 GMT

Fantastic! Thanks.

>The following code in a macro will do it:
>
[quoted text clipped - 12 lines]
> Loop
>End With

Reply to this Message