To get the value in an other cell

=UPPER(A1)

If you want to do a whole sheet, with VBA

For each cell In Activesheet.UsedRange
If Not cell.HasFormula Then
cell.Value = UCase(Cell.Value)
End If
Next cell

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"dave01968" wrote in message
...
How can I change the text from lower case to upper case in an Excel work
book
and vice versa?