caps in cells

  • Thread starter Thread starter duckie
  • Start date Start date
D

duckie

how do i always have upper case letters in some cells and not others
when I click on that cell
 
Clicking in a cell will not change the case of the string in a cell.

You could use some double-click event code if that's what you're thinking of.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, _
Cancel As Boolean)
If Target.Column > 3 Then Exit Sub
On Error GoTo ErrHandler
Application.EnableEvents = False
Target.Formula = UCase(Target.Formula)
Cancel = True
ErrHandler:
Application.EnableEvents = True
End Sub


Or you could have the Upper case added as you type in the cell.
No doubleclick involved.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column > 3 Then Exit Sub
On Error GoTo ErrHandler
Application.EnableEvents = False
Target.Formula = UCase(Target.Formula)
ErrHandler:
Application.EnableEvents = True
End Sub


Gord Dibben MS Excel MVP
 
You must log in or register to reply here.

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

Similar Threads

VBA set thick borders around non empty cells in range 0
Good code, need one more step 3
auto convert to upper case 1
Change all text on Spread sheet 1
User-defined function not recognized in formula 5
Pass activecell(.address?) as a range in a function parameter? 3
Superscripting text in a cell 1
Excel Typed text appears in wrong cell 0

Back
Top