Spinner VBA

Im trying to use a spinner to change cell value this change in value initiates VBA then conditional operator 'IF' based on the cell in question. Code works fine when value is entered into cell but not when spinner changes value of the cell. Any ideas?

Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range

Set KeyCells = Range("N3")

If Not Application.Intersect(KeyCells, Range(Target.Address)) Is Nothing Then

    If Range("N3") = 2 Then