Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Multiple case in a spread sheet
I'm have the following in VB to have the rage of cells in upper case. I want
on the same spreadsheet to have range F5:F250,G5:G250 to be PROPER case. What do I need to add to make this happen? HELP Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Not Application.Intersect(Target, Range("C5:C250,H5:H250,I5:I250,J5:J250")) Is Nothing Then Target(1).Value = UCase(Target(1).Value) End If Application.EnableEvents = True End Sub |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Multiple case in a spread sheet
Replace
UCase(Target(1).Value) with Application.WorksheetFunction.Proper(Target(1).Val ue) Hope this helps, Hutch "Tom T" wrote: I'm have the following in VB to have the rage of cells in upper case. I want on the same spreadsheet to have range F5:F250,G5:G250 to be PROPER case. What do I need to add to make this happen? HELP Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Not Application.Intersect(Target, Range("C5:C250,H5:H250,I5:I250,J5:J250")) Is Nothing Then Target(1).Value = UCase(Target(1).Value) End If Application.EnableEvents = True End Sub |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
Multiple case in a spread sheet
TANKS Tom worked great.
"Tom Hutchins" wrote: Replace UCase(Target(1).Value) with Application.WorksheetFunction.Proper(Target(1).Val ue) Hope this helps, Hutch "Tom T" wrote: I'm have the following in VB to have the rage of cells in upper case. I want on the same spreadsheet to have range F5:F250,G5:G250 to be PROPER case. What do I need to add to make this happen? HELP Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Not Application.Intersect(Target, Range("C5:C250,H5:H250,I5:I250,J5:J250")) Is Nothing Then Target(1).Value = UCase(Target(1).Value) End If Application.EnableEvents = True End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel spread sheet Multiple look ups | Excel Discussion (Misc queries) | |||
Changing multiple cell text from lower case to upper case | Excel Discussion (Misc queries) | |||
multiple users to update the spread sheet at one given time | Excel Worksheet Functions | |||
How do you add multiple spreadsheets in to one spread sheet | Excel Worksheet Functions | |||
HOW DO YOU CHANGE AN ENTIRE SPREAD SHEET FROM LOWER CASE TO UPPER | Excel Discussion (Misc queries) |