title: Excel VBA Target.address worksheet.onchange infinite loop
body: <p>I have cell A1, cell B1 and cell C1, I need check if value changed in A1 by user or by VBA. Whith out If statment on Target.Address A1 makes infinite loop</p>
  
  <pre><code>Private Sub Worksheet_Change(ByVal Target As range)
  
  If Target.Address = B1 or Target.Address = C1 Then
      If IsEmpty(Cell("B1")) then
          Cell("A1").value = "Enter value"
              If IsEmpty(Cell("C1")) then
                  Cell("A1").value = ""
              Else
                  Cell("A1").value = "=C1/B1"
              End IF
      End IF
  End IF
  
  
  If Target.Address = A1
      IF "changed by user typing" Then
         Cell("B1").value = ""
         Cell("C1").value = ""
      Else
      End IF
  End IF
  End Sub
  </code></pre>
  
  <p>How to determine what Target was changed by user not from VBA?</p>