excel sheet all caps and needs to be only the first letter caps..

K

kroberts

I have an excel shhet that is all caps and I would like to change only the
first letter to caps without retyping the whole sheet...is this possible?
 
C

Chip Pearson

There is no built in way to do this. You can use the following
macro to do this.

Sub AAA()
Dim Rng As Range
For Each Rng In ActiveSheet.UsedRange.SpecialCells( _
xlCellTypeConstants, xlTextValues)
Rng.Value = UCase(Left(Rng.Text, 1)) & Mid(Rng.Text, 2)
Next Rng
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
 
Top