Reply
 
Thread Tools Display Modes
  #1   Report Post  
Posted to microsoft.public.word.docmanagement
A.N.
 
Posts: n/a
Default How replace uppercase with lowercase

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

Thanks,

AN


  #2   Report Post  
Posted to microsoft.public.word.docmanagement
George
 
Posts: n/a
Default How replace uppercase with lowercase

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



  #3   Report Post  
Posted to microsoft.public.word.docmanagement
Graham Mayor
 
Posts: n/a
Default How replace uppercase with lowercase

Select the block of text then format change case to lower case then again
to sentence case.

--

Graham Mayor - Word MVP

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


A.N. wrote:
I need to change all uppercase first letters of words to lowercase.
Any ideas?

Thanks,

AN



  #4   Report Post  
Posted to microsoft.public.word.docmanagement
A.N.
 
Posts: n/a
Default How replace uppercase with lowercase

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





  #5   Report Post  
Posted to microsoft.public.word.docmanagement
Graham Mayor
 
Posts: n/a
Default How replace uppercase with lowercase

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





  #6   Report Post  
Posted to microsoft.public.word.docmanagement
Carol
 
Posts: n/a
Default How replace uppercase with lowercase

Or you could select the block of text and depress your Shift key and tap F3
and it will cycle through the cases for you every time you tap it.
--
Carol A. Bratt, MCP



"Graham Mayor" wrote:

Select the block of text then format change case to lower case then again
to sentence case.

--

Graham Mayor - Word MVP

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


A.N. wrote:
I need to change all uppercase first letters of words to lowercase.
Any ideas?

Thanks,

AN




  #7   Report Post  
Posted to microsoft.public.word.docmanagement
A.N.
 
Posts: n/a
Default How replace uppercase with lowercase

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





  #8   Report Post  
Posted to microsoft.public.word.docmanagement
Graham Mayor
 
Posts: n/a
Default How replace uppercase with lowercase

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



  #9   Report Post  
Posted to microsoft.public.word.docmanagement
A.N.
 
Posts: n/a
Default How replace uppercase with lowercase

Thank you Graham, your macro was very helpful!

"Graham Mayor" wrote in message
...
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





  #10   Report Post  
Posted to microsoft.public.word.docmanagement
T. Jenkins
 
Posts: n/a
Default How replace uppercase with lowercase

I found this posting useful, but could not get the macro to work properly.
It did something, but unfortunately did not prompt me for the text to
replace. Can you clarify how the macro functions?

Thanks,
Todd


"Graham Mayor" wrote:

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






  #11   Report Post  
Posted to microsoft.public.word.docmanagement
Jay Freedman
 
Posts: n/a
Default How replace uppercase with lowercase

Hi Todd,

You didn't get a prompt because the macro wasn't written to provide
one. All the input is defined by the values placed in vFindText at the
beginning of the macro, and all the replacements are defined by the
values in vReplText. The remainder of the macro uses a loop to search
for each item in vFindText and replace it with the matching item in
vReplText. The result is that each upper case letter in the document
is replaced with the corresponding lower case letter.

--
Regards,
Jay Freedman
Microsoft Word MVP FAQ: http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the
newsgroup so all may benefit.

On Tue, 21 Mar 2006 08:01:28 -0800, T. Jenkins
wrote:

I found this posting useful, but could not get the macro to work properly.
It did something, but unfortunately did not prompt me for the text to
replace. Can you clarify how the macro functions?

Thanks,
Todd


"Graham Mayor" wrote:

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




Reply
Thread Tools
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
MS Word 2000 Find & Replace Drew Microsoft Word Help 6 November 16th 05 11:29 PM
BUG with replace command gds Microsoft Word Help 0 October 20th 05 07:39 PM
Find Replace all uppercase Bettergains Microsoft Word Help 5 October 7th 05 05:21 AM
Can't get Replace to work BruceM Microsoft Word Help 5 February 22nd 05 02:49 AM
Find and Replace anomaly BruceM Microsoft Word Help 7 January 18th 05 06:47 PM


All times are GMT +1. The time now is 04:08 PM.

Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright 2004-2024 Microsoft Office Word Forum - WordBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Word"