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

[Guest]

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?

 

[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