如果单元格A =是，如何删除单元格B中的值

Question

如果A：A中的值=是

，我希望能够删除单元格B：B中的值

这是我尝试的方法，但不起作用，也许我将代码放置在错误的位置？

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A:A")) Is Nothing Then
        If Target = yes Then
            Range("B" & Target.Row).Clear
        End If
    End If
End Sub