VBA excel使用currentRegion而不选择更改触发

我有如下的想法：每当用户选择某个单元格时，我都会将一个表从隐藏的工作表复制到活动的工作表中。然后，当用户更改其选择时，我需要清除复制表的内容，并从隐藏表复制另一个表

要从我使用的隐藏工作表复制表，请执行以下操作：

source.Cells(leftRow, leftCol).CurrentRegion.Copy target.Range("A1")

问题是，此操作似乎会导致selectionChanged再次被激发，从而触发我的ClearContents命令

有没有一种方法可以在不触发selectionChanged的情况下使用此命令

谢谢，

---

Li

使用

Application.EnableEvents=False

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    On Error GoTo Whoa

    Application.EnableEvents = False

    '
    '~~> YOUR CODE
    '

Letscontinue:
    Application.EnableEvents = True
    Exit Sub
Whoa:
    MsgBox Err.Description
    Resume Letscontinue
End Sub