How do I Capitalize all the font on a worksheet?

How do I change all of the font on my worksheet to caps.
I pull my information from a database where the names are in both upper and
lower case and would like to have everything uniform.
I know in Word it can be done, but do not know how to do it in Excel.
Thanks for any help.

Hi
This is one of many useful functions which are included in ASAP Utilites'
add-in. For more information, go to:
www.asap-utilities.com
Another way is to use the UPPER() function. You'll have to use helper cells
to store the uppercase results.

--
Andy.


"Vicki M" <Vicki M@discussions.microsoft.com> wrote in message
news:212B0603-AED7-4DE3-ADFB-D2F8FBB0E31D@microsoft.com...
> How do I change all of the font on my worksheet to caps.
> I pull my information from a database where the names are in both upper
> and
> lower case and would like to have everything uniform.
> I know in Word it can be done, but do not know how to do it in Excel.
> Thanks for any help.

simple macro

For Each cell In Activesheet.UsedRange
If Not IsNumeric(cell.Value) Then
cell.Value = UCase(cell.Value)
End If
Next cell

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Vicki M" <Vicki M@discussions.microsoft.com> wrote in message
news:212B0603-AED7-4DE3-ADFB-D2F8FBB0E31D@microsoft.com...
> How do I change all of the font on my worksheet to caps.
> I pull my information from a database where the names are in both upper
and
> lower case and would like to have everything uniform.
> I know in Word it can be done, but do not know how to do it in Excel.
> Thanks for any help.