Выполнить макрос excel при обновлении ячейки обновленной информации

Question

Ячейка X5 = IF (J5> 1,1,0) Мне нужно запустить макрос, когда X5 автоматически изменен на 1 при обновлении данных J5, NOT MANUAL INPUT! (Пробовал все, ничего не швами работать, просто не получить)

Answer 1

Предполагая, что это Лист1 сделать следующий код на листе Лист1:

Dim X5 As Variant 

Private Sub Worksheet_Change(ByVal Target As Range) 
    If Range("X5").Value = 1 And X5 <> 1 Then 
     MsgBox ("Macro") 
    End If 
    X5 = Range("X5").Value 
End Sub 

Мы проверяем, если новое значение 1 и старое значение не 1, а затем запустить макрос и, наконец, сохранить новое значение в качестве старого значения. Если вы хотите, чтобы он ТОЛЬКО случался, когда редактировался J5, сделайте следующее:

Dim X5 As Variant 

Private Sub Worksheet_Change(ByVal Target As Range) 
    If Target.Address = "$J$5" Then 
     If Range("X5").Value = 1 And X5 <> 1 Then 
      MsgBox ("Macro") 
     End If 
     X5 = Range("X5").Value 
    End If 
End Sub