Hi

will the following code do what you want (always test code on a copy of the
workbook first!)

sub changetoupper()
for each c in Range("A1:A100")
c.value = UCASE(c.value)
next
end sub

--
Cheers
JulieD
check out www.hcts.net.au/tipsandtricks.htm
....well i'm working on it anyway
"dplantlady" wrote in message
...
I've used the UPPER function successfully on individual cells, but when I
try
to set up a macro with wildcards or cell references, I get an error or a
circular reference...any ideas? Thanks Excel 2000