musicmaniu, or one way with a macro,

Sub CAPS()

'select range and run this to change to all CAPS

Dim cel As Range
For Each cel In Intersect(Selection, _
ActiveSheet.UsedRange)
cel.Formula = UCase$(cel.Formula)
Next
End Sub


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"musicmaniu" wrote in message
...
please send me a reply soon,.