hey all,

is there a way to select a range of cells and make the contents all lower
case?

thanks,
rodchar

rodchar -
Set up a dummy column and use the LOWER function as = LOWER(A1). Then
Copy Paste Special Values to convert that new column to values
only. Copy those over the original column and delete. If you need to
do this frequent, you'd need to write a half dozen lines of VBA.

- John Michl

thank you.

"John Michl" wrote:

rodchar -
Set up a dummy column and use the LOWER function as = LOWER(A1). Then
Copy Paste Special Values to convert that new column to values
only. Copy those over the original column and delete. If you need to
do this frequent, you'd need to write a half dozen lines of VBA.

- John Michl

This is one of the standard features of the ASAP Utilities, a free Add-in
available at www.asap-utilities.com

Vaya con Dios,
Chuck, CABGx3


"rodchar" wrote in message
...
hey all,

is there a way to select a range of cells and make the contents all lower
case?

thanks,
rodchar

Hi rodchar,

Sub CHANGE_TO_LCASE()
'select range and run this to change to all CAPS
Dim cel As Range
For Each cel In Intersect(Selection, _
ActiveSheet.UsedRange)
cel.Formula = LCase$(cel.Formula)
Next
End Sub

Which is a variation of Paul B's response to kristel, who only
yesterday needed to change an entire document to uppercase. I just
changed UCase$ to LCase$.
Ken Johnson