Format a cell to display as all caps

Is there any way to format a cell so that text entered will always display in
caps?

Hi
Not Directly !......but you can use the UPPER function.
If your data is in A1, put =UPPER(A1) in A2.
This will convet whatever you type in A1 to Uppercase in A2

HTH
Michael

"WAF" wrote:

> Is there any way to format a cell so that text entered will always display in
> caps?

No.

You cannot format a cell to display caps.

You can use event code in the worksheet to change the text to caps when you
enter it.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column > 8 Then Exit Sub
On Error GoTo ErrHandler
Application.EnableEvents = False
Target.Formula = UCase(Target.Formula)
ErrHandler:
Application.EnableEvents = True
End Sub

As written, operates on Columns A through H only. (> 8 limits)

Right-click on the sheet tab and copy/paste the code into the sheet module.


Gord Dibben Excel MVP

On Sun, 20 Mar 2005 20:39:02 -0800, WAF <WAF@discussions.microsoft.com> wrote:

>Is there any way to format a cell so that text entered will always display in
>caps?

This works great, except I need it to work with columns 4, 6, 9, 12, & 13. Do you know of a way to do that? Thank you.