ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   How do you globally change format from upper to lower case In Mic. (https://www.excelbanter.com/excel-discussion-misc-queries/2307-how-do-you-globally-change-format-upper-lower-case-mic.html)

RCC User

How do you globally change format from upper to lower case In Mic.
 


Frank Kabel

Hi
only possible using VBA.
http://www.cpearson.com/excel/case.htm

--
Regards
Frank Kabel
Frankfurt, Germany
"RCC User" <RCC schrieb im Newsbeitrag
...




PlayingToAudienceOfOne

How do you globally change format from upper to lower case In
 
Copy the following 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

End Sub


"Frank Kabel" wrote:

Hi
only possible using VBA.
http://www.cpearson.com/excel/case.htm

--
Regards
Frank Kabel
Frankfurt, Germany
"RCC User" <RCC schrieb im Newsbeitrag
...






All times are GMT +1. The time now is 11:13 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com