Hello thalia
Not sure about what you want:
How do I enter capital letters?
- Activate CapsLock Key
How do I convert all string values already entered?
- Use a macro:
Sub ChangeIntoCaps()
Dim rg As Range
For Each rg In Range("A1:B10")
If Application.WorksheetFunction.IsText(rg) Then
rg.Value = UCase(rg)
End If
End Sub
Oops sorry: one line is missing in the macro sample:
Sub ChangeIntoCaps()
Dim rg As Range
For Each rg In Range("A1:B10")
If Application.WorksheetFunction.IsText(rg) Then
rg.Value = UCase(rg)
End If
Next rg
End Sub
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column > 2 Then Exit Sub
On Error GoTo ErrHandler
Application.EnableEvents = False
Target.Formula = UCase(Target.Formula)
ErrHandler:
Application.EnableEvents = True
End Sub
As written Works on column A:B only.
This is event code. Right-click on the sheet tab and "View Code".
please, disregard font for lowercase (my mistake)
lowercase shows with fonts:
- Freshbot
- Poornut
- Pussycat
hth,
hector.
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.