View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Alok Alok is offline
external usenet poster
 
Posts: 318
Default Not allowing users to enter data into certain cells if another cel

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