Thread: UPPERCASE to lowercase

We have an export that is roughly 3,000 rows. In column A, customer names, export is in ALL CAPS. We want to change from ALL CAPS to normal formatting.

ie:

KAUAI FRESH FARMS to Kauai Fresh Farms
ROBERT TORNELLO to Robert Tornello

We are trying to do this without retyping the data in each cell. Any quick fixes?

Cheers,

Eric Christian

Hi Eric,

Did you look at the functions: Upper(), Lower(), and Proper()

I don't have 2011 MAC, but guessing maybe it has VBA.

Try...

Sub ProperCase()
    Dim LR As Long
    Dim i As Long
    LR = Range("A" & Rows.Count).End(xlUp).Row
    For i = 1 To LR
        Range("A" & i).Value = Application.WorksheetFunction.Proper(Range("A" & i))
    Next i
End Sub

=proper(range)
This would have to be used in a separate column
If you want this to be done automatically, VBA would have to be involved.
Attach a sample workbook reflecting what your workbook setup is like, so somebody can assist you.

Darn it!!
Okay, then go with Jeff's solution.

another vba i think??!

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

Note: Select all first the entries then run macro ... don't know MAC...

Originally Posted by ericinarcata

Thanks. Here is part of the file. Column A is in all caps. Trying not to use another column. Never created a macro or VBA before. Is it pretty simple.

Hi Eric,

Are you asking another question?

http://www.rondebruin.nl/code.htm

Creating macros are relative to the amount of time they take and are they easy. Well, I have been hanging around this forum for quite some time and I feel pretty comfortable with a macro like this one, but some of the macros these other folks do are simply amazing.