其他单元格值更改时如何将单元格值更新为“”？

Question

我需要如果我改变单元格K2的值，单元格E2的值应该等于“”。

我需要对所有行都这样做，K3 E3、K4 E4、Kn En ..。

Private Sub Worksheet_Change(ByVal Target As Range)

If Target = Range("K2") Then
    Range("E2").Value = ""
End If

End Sub

Answer 1

让我们试试：

   Private Sub Worksheet_Change(ByVal Target As Range)


   If Not(intersect(target,[K:k]) is nothing) Then Range("E" & target.row).Value = vbnullstring

   End Sub

或更好：

Private Sub Worksheet_Change(ByVal Target As Range)


If target.column=[k:k].column and target.cells.count=1 Then Range("E" & target.row).Value = vbnullstring

End Sub