automatisch Zellenwert ersetzen, basierend auf einer anderen Zelle - VBA

Question

Also, ich bin neu in diesem ...

ich diesen Code haben:

Private Sub Worksheet_Change() 


    If Range("C2").Value = "T0" Then 
     Range("C4").Value = "1" 
    End If 


End Sub 

Aber Excel hält auf mich geben ein „Run- Zeitfehler 28: Out of Stack space“

Answer 1

Private Sub Worksheet_Change(ByVal Target As Range) If target.address="$C$2" and target.value = "T0" Then Range("C4").Value = "1" End If End Sub

Überprüfung der Zieladresse ist C2 optional ist, war ich davon aus, dass C2 geändert wird, das ist, was Sie Trapping.