Search and Replace with footnotes in Word 2000
Thread poster: Jackie Bowman

Jackie Bowman

Local time: 19:50
Spanish to English
+ ...
Feb 27, 2006

Folks,

I am editing a document in Word 2000 that has about a million footnotes. Every time, the author has put the full stop (the period) after the footnote reference number in the text.

In every case, I have to put the footnote reference number after the full stop.

I cannot seem to do this with Search and Replace. I open up the whole S & R dialogue and insert ‘^f.’ in the Search line, using the Special button. But when the cursor is in the Replace line, the Special button does not give me the ‘footnote mark’ option. So I cannot insert ‘.^f’

If I simply paste the ^f symbol from the Search line into the Replace line, and press the Replace button, I get a message that ‘^f is not a valid special character for the Replace With box’.

Is there any way to do this without manually changing about a million footnotes?

Many thanks,
JB


Direct link Reply with quote
 
Ken Cox  Identity Verified
Local time: 01:50
German to English
+ ...
IMO you could do it with a macro Feb 27, 2006

...but I'm hopeless at coding macros. With a bit of luck, someone with a digital thumb (so to speak) will come to your aid.

The logic of the macro would be:

find the combination ^f.
delete the full stop
go back one character position
insert a full stop
repeat the above steps until ^f. is no longer found

[Edited at 2006-02-27 17:41]

[Edited at 2006-02-27 17:42]

[Edited at 2006-02-27 17:42]


Direct link Reply with quote
 
Aleksandr Okunev
Local time: 02:50
English to Russian
Here's my try Feb 27, 2006

Jack Bowman wrote: Is there any way to do this without manually changing about a million footnotes?


Here's a macro I recorded and tried. Works nicely here.
================================
Sub FootnoteMacro()

' this portion finds the footnote

Selection.Find.ClearFormatting
With Selection.Find
.Text = "^f."
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With

' this portion swaps the period and the footnote

Selection.Find.Execute
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.Cut
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.Paste

End Sub
==============================
Put it into your Word, assign a hotkey to it and you're done.

HTH
Aleksandr


Direct link Reply with quote
 

Gusztáv Jánvári  Identity Verified
Hungary
Local time: 01:50
English to Hungarian
+ ...
A little addition to process all footnotes in a bunch Feb 27, 2006

A little addition to Aleksandr's macro to replace all footnotes in the document (his version was intended to find and replace only the next footnote after the current position).

==========================================
Sub FootnoteMacro()

' this portion finds the footnote

Selection.Find.ClearFormatting
With Selection.Find
.Text = "^f."
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With

' this portion swaps the period and the footnote

Do While Selection.Find.Execute
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.Cut
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.Paste
Loop
End Sub
==========================================


Direct link Reply with quote
 

Jackie Bowman

Local time: 19:50
Spanish to English
+ ...
TOPIC STARTER
Macro Feb 27, 2006

Very many thanks, Aleksandr, for writing that. Very goof of you. I'll try it and let you know how it goes here.

JB


Direct link Reply with quote
 

Jackie Bowman

Local time: 19:50
Spanish to English
+ ...
TOPIC STARTER
Thank you!! Feb 28, 2006

You two guys are the absolute best. Thanks a thousand times for doing that macro. Works really well. Roses to both of you.

Direct link Reply with quote
 


To report site rules violations or get help, contact a site moderator:


You can also contact site staff by submitting a support request »

Search and Replace with footnotes in Word 2000

Advanced search






Wordfast Pro
Translation Memory Software for Any Platform

Exclusive discount for ProZ.com users! Save over 13% when purchasing Wordfast Pro through ProZ.com. Wordfast is the world's #1 provider of platform-independent Translation Memory software. Consistently ranked the most user-friendly and highest value

More info »
memoQ translator pro
Kilgray's memoQ is the world's fastest developing integrated localization & translation environment rendering you more productive and efficient.

With our advanced file filters, unlimited language and advanced file support, memoQ translator pro has been designed for translators and reviewers who work on their own, with other translators or in team-based translation projects.

More info »



Forums
  • All of ProZ.com
  • Term search
  • Jobs
  • Forums
  • Multiple search