How can I allow a textbox to only be changed when another cell has a certain value?
Here is what I have so far that doesn't work:
Private Sub TextBox4_Change(ByVal Target As Range)
If Intersect(Target, Range("E7")) Is Nothing Then
MsgBox "Please Enter Date"
TextBox4.Value = ""
End If
Here is what I have so far that doesn't work:
Private Sub TextBox4_Change(ByVal Target As Range)
If Intersect(Target, Range("E7")) Is Nothing Then
MsgBox "Please Enter Date"
TextBox4.Value = ""
End If