Changing text case

  • Thread starter Thread starter Sandra More
  • Start date Start date
S

Sandra More

Does anyone know how to change mixed case text on a
worksheet to all uppercase? It's a fairsized worksheet and
I need to change all the text to all caps.

If I remember correctly, the formula should be =UPPER
(reference), but I'm missing something because that's not
working...

Any help would be appreciated.

Thanks!
Sandra
 
Sandra, =upper(yourrange) will change one cell at a time, you will have to
use another column to use it. This macro will do it a lot faster
Sub CAPS()
'select range and run this to change to all CAPS
Dim cel As Range
For Each cel In Intersect(Selection, _
ActiveSheet.UsedRange)
cel.Formula = UCase$(cel.Formula)
Next
End Sub

--
Paul B
Always backup your data before trying something new
Using Excel 97 & 2000
Please post any response to the newsgroups so others can benefit from it
** remove news from my email address to reply by email **
 
Back
Top