AVOID UPPER CASE

  • Thread starter Thread starter Salza
  • Start date Start date
S

Salza

Hi all,

Is there any way I can stop users from typing all UPPER CASE in Column A all
the way down.
I want to allow them to use Title Case only.
I have tried a few methods like format conditioning and macro. They work but
users can still copy ALL UPPER CASE TEXT in other column and paste here in
column A.

Any suggestion? Thanks.

Regards, Salza
 
If you place the following code in to the Sheet Object, it will make the
text entries in col A PROPER CASE. However, it needs a little more
tweaking to solve the copy/ paste business. If you paste all caps into
a cell, the cell remains all caps until you leave the cell then
re-select that cell. The all caps then turn to proper case.

I tried adding an offset selection, then reselecting (via code) but got
stuck in a continuous loop. Maybe someone else can finish this up for
us.

HTH





Option Explicit


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Range("A:A"), Target) Is Nothing Then
Target = Application.Proper(Target)

End If

End Sub
 
Better to use the worksheet change event so that it gets converted upon
input rather than when next selected.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
Back
Top