Hello,

I have a merged cell F28 which consists of F28:I28. In the following when F28 is filled "Nothing" is returned. I have inserted some message boxes in place of code to help see what is executed. Can someone help?

Private Sub Worksheet_Change(ByVal Target As Range)
Set Target = Range("F28")
If Not Intersect(Target, Range("F$28")) Is Nothing Then MsgBox ("Nothing") 'Exit Sub
Application.EnableEvents = True
If Target.Value = "US -USA" Then
MsgBox ("Enable") 'Application.Run "Enable_state_droplist"
ElseIf Target.Value <> "US -USA" Then
MsgBox ("Disable") 'Application.Run "Disable_state_droplist"


End If
End Sub

Thank you,
Joe M.