Active Cell.

Nigel Martin · Mar 6th, 2002, 02:58 AM

I want to write a macro whereby it takes the end user into a specific cell in edit mode and will not let the end user leave the cell blank (I have already validated the cell to require a date) any ideas?

Dave Hawley · Mar 6th, 2002, 03:20 AM

Hi Nigel

assumming you know how to select a cell with VBA place this in the Private Module of the Sheet concerned. Right click on the sheet name tab and select "View Code"

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Application.MoveAfterReturn = Not IsEmpty(Target.Value)
End If
End Sub

As you can see it assumes your cell is A1

Nigel Martin · Mar 6th, 2002, 06:36 AM

Sorry I don't know how to select a cell with VBA.

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Mar 6th, 2002, 02:58 AM	#1
Nigel Martin Board Regular Join Date: Feb 2002 Posts: 133	I want to write a macro whereby it takes the end user into a specific cell in edit mode and will not let the end user leave the cell blank (I have already validated the cell to require a date) any ideas?

Mar 6th, 2002, 03:20 AM	#2
Dave Hawley Banned Join Date: Feb 2002 Posts: 1,582	Hi Nigel assumming you know how to select a cell with VBA place this in the Private Module of the Sheet concerned. Right click on the sheet name tab and select "View Code" Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Application.MoveAfterReturn = Not IsEmpty(Target.Value) End If End Sub As you can see it assumes your cell is A1

Mar 6th, 2002, 06:36 AM	#3
Nigel Martin Board Regular Join Date: Feb 2002 Posts: 133	Sorry I don't know how to select a cell with VBA.