Changing letter case on mass

Or you could try code from Link

http://www.cpearson.com/excel/ChangingCase.aspx

Sub ChangeCase()
    Dim Rng As Range
    On Error Resume Next
    Err.Clear
    Application.EnableEvents = False
    For Each Rng In Selection.SpecialCells(xlCellTypeConstants, _
             xlTextValues).Cells
        If Err.Number = 0 Then
           ' Rng.Value = StrConv(Rng.Text, vbUpperCase)
           ' Rng.Value = StrConv(Rng.Text, vbLowerCase)
           ' Rng.Value = StrConv(Rng.Text, vbProperCase)
        End If
    Next Rng
    Application.EnableEvents = True
End Sub

VBA Noob

See if links help with the proper function

http://www.bettersolutions.com/excel...P612022322.htm
http://www.techonthenet.com/excel/formulas/proper.php

http://office.microsoft.com/en-us/ex...625731033.aspx

Glad the code helped

VBA Noob

stevesunfold,

You should know the rules by now. Please start your own thread after re-reading the forum rules below.

VBA Noob