One last thing!!:)

Is there a way to make this code select cell 7 if the users tries to enter
data into cells 9:1000
For example.. If J7 is empty and user tries to enter data in J9:J1000.. it
will not let them..(as this code does)...and then I would like have a
message pop up stating they must enter data in cell 7...and have the code
select J7.

Thanks in advance for your help!!


"KimberlyC" wrote in message
...
This works very well too!!

Thank you all for your help! :)


"Alok" wrote in message
...
Kimberly,
Try the following code. Paste it into the Worksheet_Change event of the
sheet that you want this to work in.

If Target.Cells.Count 1 Then Exit Sub

If Target.Cells(1).Row = 9 _
And Target.Cells(1).Row <= 1000 _
And Target.Cells(1).Column = 10 _
And Target.Cells(1).Column <= 33 Then

If Target.Parent.Cells(7, Target.Cells(1).Column).Value = ""
Then
Application.EnableEvents = False
Application.Undo
Application.EnableEvents = True
End If
End If


HTH
Alok Joshi


"KimberlyC" wrote:

Hi,

I would like to NOT allow the user to enter any data into cells
J9:J1000 if cell J7 is empty and
K9:K1000 if K7 is empty and
L9:L1000 if L7 is empty and
M9:M1000 if M7 is empty and
N9:N1000 if N7 is empty and
O9:O1000 if O7 is empty and
All the way to
AG9:AG1000 if AG7 is empty

I was thinking I could do this with data valadation..but I could not
get
that to work.

Maybe this can be done with VBA??

Any help is greatly appreciated.

Thanks,
Kimberly