Question

我在工作表中编写了以下代码，所有范围都在同一张表中。

str_cpy()

如果我选择DistMatrix范围内的单元格，我想运行一个被调用的子。

这部分有效。我必须单击范围中的单元格，就像我要在其中写入一样，然后再选择另一个单元格来运行。

但是我希望只要我选择单元格就可以运行子程序。我不想再点击它就好像要编辑它然后选择另一个让它运行。

Answer 1

您可以改为使用Worksheet_SelectionChange。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("DistMatrix")) Is Nothing Then
        Dim out1() As Double
        out1 = OutStat(bucket(Target), Range("RegScale"))
        FwdOut = outright(bucket(Target), Range("RegScale"))
        Call NewScatter(FwdOut, out1)
    End If
End Sub

VBA工作表更改无法正常工作？

1 个答案: