try

Sub makeupper()
For Each c In ActiveSheet.UsedRange
c.Value = UCase(c)
Next
End Sub

--
Don Guillett
SalesAid Software

"Manu Palao" wrote in message
...

Hi
does anybody know if there is a way to convert all the cells of a sheet
into their uppercase version without doing it individually?
thanks!!


--
Manu Palao
------------------------------------------------------------------------
Manu Palao's Profile:
http://www.excelforum.com/member.php...o&userid=16205
View this thread: http://www.excelforum.com/showthread...hreadid=314309