VBA Code erweitern
14.03.2018 19:37:51
Roman
Und zwar habe ich einen Code geschrieben, der auch wunderbar funktioniert, so wie ich es auch _ brauche.
Private Sub Worksheet_Change(ByVal Target As Range)
If [c9] "" Then
Exit Sub
Else
If [j7] "" Then
Range("c9").Value = Range("b9").Value - Range("j7").Value
End If
End If
End Sub
Das heißt wenn ich in j7und b9 eine zahl schreibe, subtrahiert er die Zahlen und spuckt das ergebnis in c9 aus. j7 kommt auch durch diverse Formeln zusammen und ändert sich jeden Tag. Deshalb führt er den Befehl nicht mehr aus, wenn c9 bereits ein Ergebnis enthält, damit er diese nicht jeden tag überschreibt.
Das ganze funktioniert ja mit dem Code super. So jetzt zu meiner Frage. Kann man den code so verändern, dass genau das gleich auch in den Zeilen drunter passiert? D.h. c10=b10-j7 etc.
Anzeige