How do change entire worksheet to uppercase letters and lock it

[aeromutt]

Conditional Formating has only effected the cell or a string of text. I wish
to change the entire worksheet to uppercase letters. Can this be done or
will I have to download more fonts and change it? Then after I do that, how
do I keep somebody from changing the template?

 

[Ron de Bruin]

Hi aeromutt

You can use code to do it

See this webpages

http://www.mvps.org/dmcritchie/excel/proper.htm
Or
http://www.cpearson.com/excel/case.htm


Here is a example for changing text cells in the selection

Sub Uppercase_macro()
Dim selectie As Range
Dim cel As Range
On Error Resume Next
Set selectie = Range(ActiveCell.Address & "," & Selection.Address) _
.SpecialCells(xlCellTypeConstants, xlTextValues)
If selectie Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For Each cel In selectie
cel.Value = UCase(cel.Value)
Next cel
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub

 

[Jim Cone]

You can download the free Excel add-in "Excel Extras" which can change
text in the selection to either upper, lower, proper or sentence case.
It provides new items on the format menu for ease of use.
Plus the add-in can sort sheets, insert a table of contents and do other
nice stuff. Download from http://www.realezsites.com/bus/primitivesoftware

Note to Ron de Bruin:
I like your technique for avoiding the single cell/special cells issue.

Jim Cone
San Francisco, USA


"aeromutt" <[email protected]>
wrote in message
Conditional Formating has only effected the cell or a string of text. I wish
to change the entire worksheet to uppercase letters. Can this be done or
will I have to download more fonts and change it? Then after I do that, how
do I keep somebody from changing the template?