Can an excel cell/column be forced to CAPITAL letters only?

  • Thread starter Thread starter DuncanM9
  • Start date Start date
D

DuncanM9

To simplify presentation of stock locations in a multi-user shared
spreadsheet I wish force all users to always show "GA05" or "AD03" style
rather than "ga05" or "Ad03" which will occur if not preset.
 
Hi,

Right click your sheet tab, view code and paste this in. Change the range to
suit

Private Sub Worksheet_Change(ByVal Target As Range)
Const WS_RANGE As String = "A1:A100" '<== change to suit
On Error GoTo ws_exit
Application.EnableEvents = False
If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then
Target.Formula = UCase(Target.Formula)
End If
ws_exit:
Application.EnableEvents = True
End Sub

Mike
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top