Is there a way to change multiple cells from lower case to upper case? I
figured out how to format one cell at a time, but not multiple.
--
Patti

Just use the UPPER() function in cell to the right and fill down as
needed.

For example if you are doing this in column B, type =UPPER(A1) in cell
B1, then click the fill handle to complete the sequence.


Check out http://www.bettersolutions.com/excel...T423111411.htm
for visual aid.


HTH,
JP

On Jan 4, 2:51*pm, Patti wrote:
Is there a way to change multiple cells from lower case to upper case? *I
figured out how to format one cell at a time, but not multiple.
--
Patti

Would you be up for a macro?

Sub Upper_Case()
'David McRitchie, programming, 2003-03-07
Dim rng1 As Range, rng2 As Range, bigrange As Range
Dim Cell As Range
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
On Error Resume Next
Set rng1 = Intersect(Selection, _
Selection.SpecialCells(xlCellTypeConstants))
Set rng2 = Intersect(Selection, _
Selection.SpecialCells(xlCellTypeFormulas))
On Error GoTo 0
If rng1 Is Nothing Then
Set bigrange = rng2
ElseIf rng2 Is Nothing Then
Set bigrange = rng1
Else
Set bigrange = Union(rng1, rng2)
End If
If bigrange Is Nothing Then
MsgBox "All cells in range are EMPTY"
GoTo done
End If
For Each Cell In bigrange
Cell.Formula = UCase(Cell.Formula)
Next Cell
done:
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub


Gord Dibben MS Excel MVP

On Fri, 4 Jan 2008 11:51:00 -0800, Patti
wrote:

Is there a way to change multiple cells from lower case to upper case? I
figured out how to format one cell at a time, but not multiple.