excel - 如果与另一个范围相交，则停止触发事件 SelectionChange(已使用相交)

Question

我正在使用下面的代码来运行宏 Calendar_Advanced如果在 列中选择了任何单元格手机 .
问题:如果我使用 Range M:M 同时选择任何单元格，该事件也会触发，就像我选择了所有行一样。

Private Sub worksheet_SelectionChange(ByVal Target As Excel.Range)

    Dim LastRow As Long: LastRow = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row
      
    If Not Intersect(Target, Range("M3:M" & LastRow)) Is Nothing Then
        Call Calendar_Advanced
    End If
End Sub

我试图添加到 If 条件 And Selection.Cells.Count = 1 .
它可以工作，但会阻止多选 ( Calendar_Advanced ) 在列 M 上运行。

Answer 1

计算列以确保它只是 M。

Private Sub worksheet_SelectionChange(ByVal Target As Excel.Range)

    Dim LastRow As Long: LastRow = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row
    If Not Intersect(Target, Range("M3:M" & LastRow)) Is Nothing Then
        If Target.Columns.Count = 1 Then
            Calendar_Advanced
        End If
    End If
End Sub