Как обновить значение ячейки до "", если изменилось другое значение ячейки?

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