This formula makes it so that if something is entered in cell B2, it requires you to put something in D2. A pop-up appears and you can't continue until you do.
How can I make this do this for other rows?
Something in B3, requires you to put something in D3, and so on.
Thanks for any help.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim B As Range, D As Range
Set B = Range("B2")
Set D = Range("D2")
If B <> "" And D = "" Then
Application.EnableEvents = False
D.Select
Application.EnableEvents = True
MsgBox "Your ID Number is Required"
End If
End Sub
How can I make this do this for other rows?
Something in B3, requires you to put something in D3, and so on.
Thanks for any help.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim B As Range, D As Range
Set B = Range("B2")
Set D = Range("D2")
If B <> "" And D = "" Then
Application.EnableEvents = False
D.Select
Application.EnableEvents = True
MsgBox "Your ID Number is Required"
End If
End Sub