excel - 如果单元格不为空，则尝试让脚本不运行

Question

代码相对简单。如果我单击 L8:L98 中的一个单元格，并且该单元格为空白，则该单元格中将包含“T”，并且其他相关单元格将被清空。

If Intersect(Target, Range("C7:C98")) Is Nothing And Not Intersect(Target, Range("L7:L98")) Is Nothing Then
    Application.EnableEvents = False
    With Intersect(Target, Range("L7:L98"))
        .Value = "T"
        .Offset(, 1).Resize(, Col).ClearContents
End With

我的问题是，如果 C 列中同一行的单元格中有数据，我希望 if 语句返回 false 并跳过它。我还尝试了使用 Intersect(target.offset(, -9)... 和不使用 intersect 的代码。两者都不适合我。

Answer 1

相交测试你点击的单元格是否在范围内，除非你同时点击C中的单元格和L中的单元格否则你永远不会满足If。

那么我们来测试一下同一行C列的单元格是否为空。

If Range("C" & Target.Row)="" And Not Intersect(Target, Range("L7:L98")) Is Nothing Then
    Application.EnableEvents = False
    With Intersect(Target, Range("L7:L98"))
        .Value = "T"
        .Offset(, 1).Resize(, Col).ClearContents
End With