工作表宏不会执行

Question

我正在尝试编写一个在更改特定单元格时执行的宏。启用所有宏并在执行时工作簿宏工作。我希望代码运行的工作表是Sheet2，所以在Sheet2特定的代码中，我把下面的代码：

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Me.Range("D20")) Is Nothing Then Exit Sub
    Application.EnableEvents = False 'to prevent endless loop   
    On Error GoTo Finalize 'to re-enable the events
    MsgBox "You changed THE CELL!"
Finalize:
    Application.EnableEvents = True
End Sub

然而，当我调整细胞D20时，没有任何反应。我在行If Intersect(Target, Me.Range("D20")) Is Nothing Then Exit Sub上的代码开头放了一个断点，但是从未到达该断点。你知道我做错了什么，我能做些什么来解决这个问题？

谢谢