How do change entire worksheet to uppercase letters and lock it

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?

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


--
Regards Ron de Bruin
http://www.rondebruin.nl


"aeromutt" <aeromutt@discussions.microsoft.com> wrote in message news:7A55E56F-EC41-4198-9B50-3F649F338A38@microsoft.com...
> 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?

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" <aeromutt@discussions.microsoft.com>
wrote in message
news:7A55E56F-EC41-4198-9B50-3F649F338A38@microsoft.com...
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?