how to make whole work sheet in to upper case
Sub Upper()
Dim Cell As Range
Application.ScreenUpdating = False
For Each Cell In Selection
Cell.Formula = UCase(Cell.Formula)
Next
Application.ScreenUpdating = True
End Sub
Sub Lower()
Dim Cell As Range
Application.ScreenUpdating = False
For Each Cell In Selection
Cell.Formula = LCase(Cell.Formula)
Next
Application.ScreenUpdating = True
End Sub
Sub Proper()
Dim Cell As Range
Application.ScreenUpdating = False
For Each Cell In Selection
Cell.Formula = Application.Proper(Cell.Formula)
Next
Application.ScreenUpdating = True
End Sub
Gord Dibben MS Excel MVP
On Thu, 3 Jul 2008 04:10:01 -0700, Mahesh
wrote:
hi
i could not convert upper case words or sentence to lower case or visa versa
like.. if "how to make whole work sheet in to upper case" this to be made
to upper case.. how could this be done.. plz help
Regards
Mahesh
|