You are right. I didn't read this as closely as I should. My brain is not
firing on all cylinders this morning so there may be a simpler method, but
the following macro will work in the meantime -
http://www.gmayor.com/installing_macro.htm

Sub ReplaceList()
Dim vFindText As Variant
Dim vReplText As Variant
Dim i As Long

vFindText = Array("([0-9] )A", "([0-9] )B", "([0-9] )C", "([0-9] )D", _
"([0-9] )E", "([0-9] )F", "([0-9] )G", "([0-9] )H", "([0-9] )I", _
"([0-9] )J", "([0-9] )K", "([0-9] )L", "([0-9] )M", "([0-9] )N", _
"([0-9] )O", "([0-9] )P", "([0-9] )Q", "([0-9] )R", "([0-9] )S", _
"([0-9] )T", "([0-9] )U", "([0-9] )V", "([0-9] )W", "([0-9] )X", _
"([0-9] )Y", "([0-9] )Z")
vReplText = Array("\1a", "\1b", "\1c", "\1d", _
"\1e", "\1f", "\1g", "\1h", "\1i", _
"\1j", "\1k", "\1l", "\1m", "\1n", _
"\1o", "\1p", "\1q", "\1r", "\1s", _
"\1t", "\1u", "\1v", "\1w", "\1x", _
"\1y", "\1z")
Selection.HomeKey Unit:=wdStory
With Selection.Find
.Forward = True
.Wrap = wdFindContinue
.MatchWholeWord = False
.MatchWildcards = True
.MatchSoundsLike = False
.MatchAllWordForms = False
.Format = True
.MatchCase = True

For i = LBound(vFindText) To UBound(vFindText)
.Text = vFindText(i)
.Replacement.Text = vReplText(i)
.Execute replace:=wdReplaceAll
Next i
End With
End Sub

--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


A.N. wrote:
Thank you Graham, I read your article and several others on wildcard
use but am not having any luck regarding how to Replace an UpperCase
letter with a LowerCase letter (not whole words).

Thanks,
A.N.

"Graham Mayor" wrote in message
...
You'd need a wildcard search and replace for that - see
http://www.gmayor.com/replace_using_wildcards.htm

--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


A.N. wrote:
Thanks.

Do you know how I could search and find only those uppercase letters
that are ajacent to a number, and then to replace with a lowercase
letter instead?

Example: 1 This is a sentence

So the search is for ^number^space^uppercase letter

Replaced with lowercase letter.

Thanks,

AN


"George" wrote in message
...
1) Select all text
2) From Format menu select change case
3) Select sentence case

Regards,

George


? ??????? "A.N." ???????:

I need to change all uppercase first letters of words to
lowercase. Any ideas?

Thanks,

AN