uppercase

  • Thread starter Thread starter oldLearner57
  • Start date Start date
O

oldLearner57

hi community,

how can i force a cell entry to have the text change to Uppercase?

any guidance much appreciated

10s community

:)
 
Select the sheet tab which you want to work with. Right click the sheet tab
and click on 'View Code'. This will launch VBE. Paste the below code to the
right blank portion. Get back to to workbook and try out.

'The below code works on cell A1. modify to suit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Application.EnableEvents = False
Target = UCase(Target)
Application.EnableEvents = True
End If
End Sub
 
Do you want this to happen to a specific cell, or to a specific range of
cells, or to any cell in the sheet? Jacob gave you a solution for one cell.
Come back and provide more info on what you want to do. HTH Otto
 
10s! appreciated for the replied and it works!!
how then I can change to have the effect for say, example, to the whole
column?
I tried changed the .Address to ' .Range = "A1:A1" '
but i got an error.
can assist on this??

10s again

and 10s to community as well

Wish all a Blessed Merry X'mas
 
Range("A:A") Otto

oldLearner57 said:
10s! appreciated for the replied and it works!!
how then I can change to have the effect for say, example, to the whole
column?
I tried changed the .Address to ' .Range = "A1:A1" '
but i got an error.
can assist on this??

10s again

and 10s to community as well

Wish all a Blessed Merry X'mas
Click to expand...
 
Back
Top