CAPS LOCK

[Nigel Martin]

Is there any way that CAPS LOCK can be turned on automatically when a specific worksheet is activated, then turned off again when another worksheet or workbook is activated ?

 

[Anne Troy]

Not likely. But there is code that will turn all cell entries into upper case.

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Not Application.Intersect(Target, Range("A1:A10")) Is Nothing Then
Target(1).Value = UCase(Target(1).Value)
End If
Application.EnableEvents = True
End Sub

 

[Nigel Martin]

Many thanks it works well.