Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
Where is the "Change Case" menu item? Did Microsoft actually remove a useful
feature across version updates, or am I just paranoid? |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
That's not an Excel feature. It is in Word, but not Excel unless it is by
way of add-in or code -- HTH Nick Hodge Microsoft MVP - Excel Southampton, England DTHIS web: www.nickhodge.co.uk blog (non-tech): www.nickhodge.co.uk/blog/ "Deinekes" wrote in message ... Where is the "Change Case" menu item? Did Microsoft actually remove a useful feature across version updates, or am I just paranoid? |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
Paranoid, there has never been a change case menu item in Excel, if you had
it in an earlier version it must have been a 3rd party add-in like ASAP utilities etc. -- Regards, Peo Sjoblom "Deinekes" wrote in message ... Where is the "Change Case" menu item? Did Microsoft actually remove a useful feature across version updates, or am I just paranoid? |
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
Or function of course for lower. Proper and UPPER case
=UPPER(A1) =LOWER(A1) =PROPER(A1) But they're still there right up to 2007 -- HTH Nick Hodge Microsoft MVP - Excel Southampton, England DTHIS web: www.nickhodge.co.uk blog (non-tech): www.nickhodge.co.uk/blog/ "Nick Hodge" wrote in message ... That's not an Excel feature. It is in Word, but not Excel unless it is by way of add-in or code -- HTH Nick Hodge Microsoft MVP - Excel Southampton, England DTHIS web: www.nickhodge.co.uk blog (non-tech): www.nickhodge.co.uk/blog/ "Deinekes" wrote in message ... Where is the "Change Case" menu item? Did Microsoft actually remove a useful feature across version updates, or am I just paranoid? |
#5
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
Thanks for the answer, folks! You were right: paranoia. I checked it out
myself, as well. Word 2003 -- yes, Excel 2003 -- no. The fact that I use OpenOffice as well -- and it IS a Format menu item there -- explains the source of my confusion. Looks like I need to stop comparing Excel to free software. :-) Thanks again for the quick response. "Deinekes" wrote: Where is the "Change Case" menu item? Did Microsoft actually remove a useful feature across version updates, or am I just paranoid? |
#6
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
Try this macro:
Sub Change_Case() Dim ocell As Range Dim Ans As String Ans = Application.InputBox("Type in Letter" & vbCr & _ "(L)owercase, (U)ppercase, (S)entence, (T)itles ") If Ans = "" Then Exit Sub For Each ocell In Selection.SpecialCells(xlCellTypeConstants, 2) Select Case UCase(Ans) Case "L": ocell = LCase(ocell.Text) Case "U": ocell = UCase(ocell.Text) Case "S": ocell = UCase(Left(ocell.Text, 1)) & _ LCase(Right(ocell.Text, Len(ocell.Text) - 1)) Case "T": ocell = Application.WorksheetFunction.Proper(ocell.Text) End Select Next "Deinekes" wrote: Where is the "Change Case" menu item? Did Microsoft actually remove a useful feature across version updates, or am I just paranoid? |
#7
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
Thanks!
"PlayingToAudienceOfOne" wrote: Try this macro: Sub Change_Case() Dim ocell As Range Dim Ans As String Ans = Application.InputBox("Type in Letter" & vbCr & _ "(L)owercase, (U)ppercase, (S)entence, (T)itles ") If Ans = "" Then Exit Sub For Each ocell In Selection.SpecialCells(xlCellTypeConstants, 2) Select Case UCase(Ans) Case "L": ocell = LCase(ocell.Text) Case "U": ocell = UCase(ocell.Text) Case "S": ocell = UCase(Left(ocell.Text, 1)) & _ LCase(Right(ocell.Text, Len(ocell.Text) - 1)) Case "T": ocell = Application.WorksheetFunction.Proper(ocell.Text) End Select Next "Deinekes" wrote: Where is the "Change Case" menu item? Did Microsoft actually remove a useful feature across version updates, or am I just paranoid? |
#8
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
Tack och hej då!
"Peo Sjoblom" wrote: Paranoid, there has never been a change case menu item in Excel, if you had it in an earlier version it must have been a 3rd party add-in like ASAP utilities etc. -- Regards, Peo Sjoblom "Deinekes" wrote in message ... Where is the "Change Case" menu item? Did Microsoft actually remove a useful feature across version updates, or am I just paranoid? |
#9
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
How do I take the macro you gave me and put it into my Excel program?
"PlayingToAudienceOfOne" wrote: Try this macro: Sub Change_Case() Dim ocell As Range Dim Ans As String Ans = Application.InputBox("Type in Letter" & vbCr & _ "(L)owercase, (U)ppercase, (S)entence, (T)itles ") If Ans = "" Then Exit Sub For Each ocell In Selection.SpecialCells(xlCellTypeConstants, 2) Select Case UCase(Ans) Case "L": ocell = LCase(ocell.Text) Case "U": ocell = UCase(ocell.Text) Case "S": ocell = UCase(Left(ocell.Text, 1)) & _ LCase(Right(ocell.Text, Len(ocell.Text) - 1)) Case "T": ocell = Application.WorksheetFunction.Proper(ocell.Text) End Select Next "Deinekes" wrote: Where is the "Change Case" menu item? Did Microsoft actually remove a useful feature across version updates, or am I just paranoid? |
#10
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
The first think you do is keep your reply in the same thread you started.
Then people will know who you are talking to. Regards, Fred. "Spikessong" wrote in message ... How do I take the macro you gave me and put it into my Excel program? "PlayingToAudienceOfOne" wrote: Try this macro: Sub Change_Case() Dim ocell As Range Dim Ans As String Ans = Application.InputBox("Type in Letter" & vbCr & _ "(L)owercase, (U)ppercase, (S)entence, (T)itles ") If Ans = "" Then Exit Sub For Each ocell In Selection.SpecialCells(xlCellTypeConstants, 2) Select Case UCase(Ans) Case "L": ocell = LCase(ocell.Text) Case "U": ocell = UCase(ocell.Text) Case "S": ocell = UCase(Left(ocell.Text, 1)) & _ LCase(Right(ocell.Text, Len(ocell.Text) - 1)) Case "T": ocell = Application.WorksheetFunction.Proper(ocell.Text) End Select Next "Deinekes" wrote: Where is the "Change Case" menu item? Did Microsoft actually remove a useful feature across version updates, or am I just paranoid? |
#11
Posted to microsoft.public.excel.misc
|
|||
|
|||
What happened to "Change Case"?
great macro! saved me alot of time...
might i suggest wrapping the select case with "If ocell < "" Then", "elseif" so that you can sellect a range that includes empty cells... "PlayingToAudienceOfOne" wrote: Try this macro: Sub Change_Case() Dim ocell As Range Dim Ans As String Ans = Application.InputBox("Type in Letter" & vbCr & _ "(L)owercase, (U)ppercase, (S)entence, (T)itles ") If Ans = "" Then Exit Sub For Each ocell In Selection.SpecialCells(xlCellTypeConstants, 2) Select Case UCase(Ans) Case "L": ocell = LCase(ocell.Text) Case "U": ocell = UCase(ocell.Text) Case "S": ocell = UCase(Left(ocell.Text, 1)) & _ LCase(Right(ocell.Text, Len(ocell.Text) - 1)) Case "T": ocell = Application.WorksheetFunction.Proper(ocell.Text) End Select Next "Deinekes" wrote: Where is the "Change Case" menu item? Did Microsoft actually remove a useful feature across version updates, or am I just paranoid? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how do I count only lower case "x" and exclude upper case "X" | Excel Worksheet Functions | |||
Can you add the "Change Case" feature to Excel on future versions | Excel Discussion (Misc queries) | |||
=IF(D13="PAID","YES","NO") Can I change fonts colour | Excel Discussion (Misc queries) | |||
Use "PROPER" to change UPPERCASE text to Title Case on worksheet | Excel Worksheet Functions | |||
Excel should have a "Change Case..." menu Item like Word!! | Excel Discussion (Misc queries) |