Converting CAPS text to Proper Case

  • Thread starter Thread starter rsantos17
  • Start date Start date
R

rsantos17

Hello all,

I've read this site without registering for some time, but now I have a
question and am hoping someone can help me.

I have a book that has thousands of names all in ALL CAPS, and I was
wondering if there was a way to convert them all to Proper Case? I also
seem to be having trouble converting them one at a time using the
=Proper formula.

Any thoughts.
Much appreciated.
RS
 
You could use a sub

Sub ChangeToProper()
Dim cell as Range
For Each cell In Activesheet.Usedrange
cell.Value = APplication.Proper(cell.Value)
Next cell
End Sub

--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)
 
Back
Top