Posted to microsoft.public.excel.misc,microsoft.public.excel.programming,microsoft.public.excel.worksheet.functions

Minitman[_4_] Minitman[_4_] is offline

external usenet poster

Posts: 273

Change Cell Entry To Uppeercase

Thanks Guys,

That helps.

-Minitman

On Thu, 29 Apr 2004 17:28:39 +0100, "Bob Phillips"
wrote:

The obvious way

Private Sub Worksheet_Change(ByVal Target As Range)

On Error GoTo ws_exit:
Application.EnableEvents = False
If Not Intersect(Target, Me.Range("A1:H10")) Is Nothing Then
With Target
.Value = UCase(.Value)
End With
End If

ws_exit:
Application.EnableEvents = True
End Sub

worksheet code module.

Reply With Quote

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Posting Rules
Smilies are On [IMG] code is On HTML code is Off Trackbacks are On Pingbacks are On Refbacks are On

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Change Text Color in one cell based upon entry in referenced cell	Tee	Excel Discussion (Misc queries)	3	September 12th 08 10:07 PM
change cell values of to reflect most current entry in a range	MARYINNEED	Excel Worksheet Functions	3	April 13th 08 06:52 PM
Change colour of cells depending on entry in one cell	harwookf	Excel Worksheet Functions	9	November 3rd 07 12:38 AM
How do I change cell color upon entry, and exit?	Deb	Excel Worksheet Functions	1	August 4th 05 09:48 AM
Make cell entry event change another cell?	Ken[_11_]	Excel Programming	2	August 7th 03 02:24 PM

All times are GMT +1. The time now is 10:06 PM.

About Us

"It's about Microsoft Excel"

Menu

About Us