Cell Required before Closing

I am trying to require that the cells in column G thru J be filled out if column C contains a certain value. I have been successful at making cell G5 be required if C5 has a value but I can not expand on this. For example:
If C5 = "Proposal" then G5, H5, I5, J5 are required.
If C6 = "Proposal" then G6, H6, I6, J6 are required.
etc all the way to C2006.

This is what I have so far:

If Worksheets("2012").Range("C5").Value = "Proposal" Then
If Worksheets("2012").Range("G5").Value <> "" Then
MsgBox "You must fill in Proposal Data."
Cancel = True

End If

Any thoughts?

Jenn T wrote:

> I am trying to require that the cells in column G thru J be filled out
> if column C contains a certain value. I have been successful at making
> cell G5 be required if C5 has a value but I can not expand on this. For
> example:
> If C5 = "Proposal" then G5, H5, I5, J5 are required.
> If C6 = "Proposal" then G6, H6, I6, J6 are required.
> etc all the way to C2006.
>
> This is what I have so far:
>
> If Worksheets("2012").Range("C5").Value = "Proposal" Then
> If Worksheets("2012").Range("G5").Value <> "" Then
> MsgBox "You must fill in Proposal Data."
> Cancel = True
>
> End If
>
> Any thoughts?

Try this:

With Worksheets("2012")
For ro = 5 To 6
If .Cells(ro, 3).Value = "Proposal" Then
For co = 7 To 10
If .Cells(ro, co).Value = "" Then
.Cells(ro, co).Activate
MsgBox "You must fill in Proposal Data."
Cancel = True
Exit Sub
End If
Next co
End If
Next ro
End With

--
When you grow up, your heart dies.