Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
Tania
 
Posts: n/a
Default is it possible to change upper to lower case in excel


  #2   Report Post  
Posted to microsoft.public.excel.misc
Ron de Bruin
 
Posts: n/a
Default is it possible to change upper to lower case in excel

Hi Tania

See this two webpages

http://www.mvps.org/dmcritchie/excel/proper.htm
Or
http://www.cpearson.com/excel/case.htm

Here are some Macro's for changing text cells in the selection

Sub Uppercase_macro()
Dim selectie As Range
Dim cel As Range
On Error Resume Next
Set selectie = Range(ActiveCell.Address & "," & Selection.Address) _
.SpecialCells(xlCellTypeConstants, xlTextValues)
If selectie Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For Each cel In selectie
cel.Value = UCase(cel.Value)
Next cel
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub


Sub Lowercase_macro()
Dim selectie As Range
Dim cel As Range
On Error Resume Next
Set selectie = Range(ActiveCell.Address & "," & Selection.Address) _
.SpecialCells(xlCellTypeConstants, xlTextValues)
If selectie Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For Each cel In selectie
cel.Value = LCase(cel.Value)
Next cel
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub


Sub Propercase_macro()
Dim selectie As Range
Dim cel As Range
On Error Resume Next
Set selectie = Range(ActiveCell.Address & "," & Selection.Address) _
.SpecialCells(xlCellTypeConstants, xlTextValues)
If selectie Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For Each cel In selectie
cel.Value = StrConv(cel.Value, vbProperCase)
Next cel
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Tania" wrote in message ...



  #3   Report Post  
Posted to microsoft.public.excel.misc
FvH
 
Posts: n/a
Default is it possible to change upper to lower case in excel


To change case in Excel you need to use an Excel function. The functions
are listed below.

=UPPER()
This function will change the case of a specified cell to upper case.

=LOWER()
This function will change the case of a specified cell to lower case.

=PROPER()
This function will change the case of a specified cell to title case
(ie The first letter of each word in the cell will be capitalised).

How To Use These Functions
Its easiest to illustrate the use of these functions through an
example. If, for example, you had the word "AbOut" in cell A1 and
wanted to change the case to lower case you would use the LOWER
function in a blank cell:

=LOWER(A1)

That cell would then display "about". If, instead you had used the
UPPER function would display "ABOUT", and using the PROPER function
would display "About". You could then use the "Paste Special" command
to replace the contents of A1.


--
FvH
------------------------------------------------------------------------
FvH's Profile: http://www.excelforum.com/member.php...o&userid=30709
View this thread: http://www.excelforum.com/showthread...hreadid=503768

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
VBA Code Cell Mate Excel Discussion (Misc queries) 4 January 9th 06 08:52 PM
Convert number into words Blackwar Excel Discussion (Misc queries) 4 December 2nd 05 12:05 PM
I NEED HELP with the SPELLNUMBER Function vag Excel Worksheet Functions 0 June 21st 05 08:17 AM
Convert Numeric into Text Monty Excel Worksheet Functions 0 December 18th 04 09:25 PM
How do I change existing text from lower case to upper case CT Cameron Excel Discussion (Misc queries) 2 November 30th 04 01:07 AM


All times are GMT +1. The time now is 08:35 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"