Cell Defaults

M

Mosaic Steve

Not the answer im looking for.. I need a default set so anyone who opens the
spreadsheet and enters data, the text will automatically default to caps. I
can do this in VB and other programs. Not sure if Excel has that feature.
 
G

Gord Dibben

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

Right-click on the sheet tab and "View Code"

Copy/paste the code into that module.

Operates on columns A through H.

Change the Target.Column = 8 to adjust.


Gord Dibben MS Excel MVP
 
Top