upper to lower case

  • Thread starter Thread starter officeworker
  • Start date Start date
O

officeworker

I'm new to all this, I have an Excel file and I would like to change all the
previously entered characters in a column to lower case, at present they are
mixed. Is it possible to do this by "find and replace"? Or is there an
easier way to do it?
Many Thanks for any replies.
 
officeworker said:
I'm new to all this, I have an Excel file and I would like to change all
the previously entered characters in a column to lower case, at present
they are mixed. Is it possible to do this by "find and replace"? Or is
there an easier way to do it?
Many Thanks for any replies.
Click to expand...
I should've added, I'm using Office 07 & Win XP Pro
 
I'm new to all this, I have an Excel file and I would like to change all the
previously entered characters in a column to lower case, at present they are
mixed. Is it possible to do this by "find and replace"? Or is there an
easier way to do it?
Many Thanks for any replies.
Click to expand...

Open the macro editor (Alt+F11), insert a module, insert the following
code:
Sub toLower()

Dim rngCell As Range

For Each rngCell In Selection
rngCell.Value = LCase(rngCell.Value)
Next rngCell
End Sub

Select the cells you want to change and run the macro.
 
Not sure how this compares efficiency-wise, but here is a non-looping
one-liner macro that does the same thing...

Sub MakeLowerCase()
Selection =
WorksheetFunction.Transpose(Split(LCase(Join(WorksheetFunction.Transpose(Selection),
Chr(1))), Chr(1)))
End Sub
 
I see that line of code did not survive my newsreader's line-wrapping
mechanism. Here is the same code using a line continuation character to
preserve its display...

Sub MakeLowerCase()
Selection = WorksheetFunction.Transpose(Split(LCase(Join( _
WorksheetFunction.Transpose(Selection), Chr(1))), Chr(1)))
End Sub
 
Back
Top