automatic upper case

  • Thread starter Thread starter Tim
  • Start date Start date
T

Tim

I would like text to automatically revert to upper case as
it is enter in a cell. I tried the UPPER format but can't
seem to figure out how to format the cell I'm adding the
text to, to automatically be changed to upper case.
 
Hi Tim
you have to use VBA to achieve this (AFAIK). One way is to use the
worksheet_change event:

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

This procedure will change all entries in column A to uppercase. Paste
this code in the worksheet module (right click on the tab name, choose
'Code' and paste the code in the editor)

HTH
Frank
 
Back
Top