![]() |
How do you globally change format from upper to lower case In Mic.
|
Hi
only possible using VBA. http://www.cpearson.com/excel/case.htm -- Regards Frank Kabel Frankfurt, Germany "RCC User" <RCC schrieb im Newsbeitrag ... |
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