Ciao, hai provato in questa maniera:
codice:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Row = 1 And Target.Column = 2 Then
        MsgBox "il valore della cella è stato cambiato!"
    End If
End Sub