Need character for custom format to force upper case!

[Andrew C]

I am trying to mask the input into cells to force as uppercase only.

 

[Max]

Try this sub taken from a post by Tom Ogilvy
which will force uppercase in col A:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error goto ErrHandler
If Target.Column = 1 Then
Application.EnableEvents = false
Target.Value = UCase(Target.Value)
End if
ErrHandler:
Application.EnableEvents = True
End Sub

To implement: Right click on the tab of the sheet
where you want this behavior and select view code,
then paste in the above procedure

Adapt the target col to suit:
col A = 1, col B = 2, ...

Success? Click YES button below.
--
Max
Singapore
http://savefile.com/projects/236895
Downloads:25,000 Files:370 Subscribers:68
xdemechanik

 

[Jacob Skaria]

Private Sub Worksheet_Change(ByVal Target As Range)
Target.Value = UCase(Target.Value)
End Sub

If this post helps click Yes