How to format cells for uppercase entry

  • Thread starter Thread starter CoDer
  • Start date Start date
C

CoDer

I need to format a column so that all cell force any text entry to
uppercase. I've looked into the UPPER() function, but that is something that
would actually take the value from some otther location and display it in
uppercase where the fuction is located, which will not work.

What I'm looking for is something similar to Format->Cells->Numbers, which
allows you to define a format for numbers, so that however a number is
entered in the cell it automatically displays it in the desired format. So
I'd like to be able to have the data entry be in upper or lower case, but
the cell automatically displays it in uppercase. Can that be done?
 
It could be done but you would need a macro to do it, record a macro while
changing it to upper then set that to worksheet on events macro to the cells
required
 
CoDer

Event code................

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:H as you enter text in a cell.

Change the 8 to whatever you wish.

This is event code and must go into the sheet module.

Right-click on the sheet tab and "View Code". Copy and paste the above into
that module.


Gord Dibben MS Excel MVP
 
The event code will change the actual content to uppercase.
There is no way to display an actual content as if it were uppercase.
 
Back
Top