Use macro to find in text box

[Guest]

I've recorded a macro in Word 2000 using Find All as this finds text in a
text box but when I run the macro, the text is not found. There seems to be
no Find All option for the Find or Execute commands.

 

[Graham Mayor]

There is a problem with the macro recorder and the search command. What is
it that you are trying to find?

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[Guest]

I am trying to find by Style Name and replace text in the stated style with
replacement text.
This is to populate a template with data. Cannot use mail merge fields as I
want header information at the top of the page and repeating information from
a datasheet, which would populate text in character styles in a document
table.
Hence, if data [Record ID] would populate the first found character style
called "Record ID".
The problem is there's no wdFindAll option !

 

[Graham Mayor]

You need something like:

Sub ReplaceExample()

Selection.HomeKey Unit:=wdStory
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
'**********************
.Style = "Record ID"
.Replacement.Text = "Your text here"
'**********************
.Forward = True
.Wrap = wdFindContinue
.Format = True
.MatchCase = False
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = False
End With
Selection.Find.Execute replace:=wdReplaceAll
End Sub


--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

I am trying to find by Style Name and replace text in the stated
style with replacement text.
This is to populate a template with data. Cannot use mail merge
fields as I want header information at the top of the page and
repeating information from a datasheet, which would populate text in
character styles in a document table.
Hence, if data [Record ID] would populate the first found character
style called "Record ID".
The problem is there's no wdFindAll option !

There is a problem with the macro recorder and the search command.
What is it that you are trying to find?

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>