Hintergrund ändern wenn sich Wert ändert
30.05.2016 13:02:33
Oisse
mir stellt sich folgendes Problem:
Wenn sich der Einzelpreis ändert (Spalte J) dann soll sich die Hintergrundfarbe ändern in Spalte S.
Das funktioniert soweit auch gut.
Der Code:
If Target = Range("J" & Target.Row) Then
Range("S" & Target.Row).Interior.ColorIndex = 4
Exit Sub
End If
Wenn ich allerdings nun einen neuen Datensatz einfügen möchte z.B. per copy and paste, über die Spalten "E" bis "L" dann kommt die Fehlermeldung:
Laufzeitfehler 13, Typen unverträglich
Und wie bitte kann ich es anstellen, wenn der gleiche Einzelpreis wieder eingegeben wird, dass dann keine Markierung erfolgt?
Könnt ihr bitte helfen
Danke Gruß
Oisse
Anzeige