normal into Capital letters automatically

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Please help me to turn normal letters into CAPITALS automatically, in an
excel sheet. Thank you very much!
 
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

HTH
Cordially
Pascal
 
Hi

=UPPER(A1) will return the contents of A1 in Capitals
=LOWER(A1) returns lower case
=PROPER(A1) will capitalise the first letter .of each word
 
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

Apologies

Cordially
Pascal
 
You want it done as you enter the letters?

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".

Copy/paste the code into that sheet module.


Gord Dibben MS Excel MVP
 
hi, thalia !
Please help me to turn normal letters into CAPITALS automatically, in an excel sheet...
Click to expand...

if available, try to change the font for your range/worksheet/workbook/style/...

this fonts shows text un uppercase:
- Castellar
- Engravers MT
- Felix Titling
- Stencil
- Technic (*versalles* type)

this font shows text in lowercase:
- Chick (*condensed & bold* already)

hth,
hector.
 
hi (again), thalia !

please, disregard font for lowercase (my mistake)
lowercase shows with fonts:
- Freshbot
- Poornut
- Pussycat

hth,
hector.
 
Back
Top