code
06.02.2017 20:06:45
Halbe
Private Sub Worksheet_Change(ByVal Target As Range)
'Wenn keine Eingabe in Spalte C erfolgt, dann Makro verlassen
If Intersect(Target, Range("f:f")) Is Nothing Then Exit Sub
'Wenn in Spalte D nein steht, dann in Spalte G den Zähler um 1 erhöhen
If Cells(Target.Row, 8) = "falsch" Then Cells(Target.Row, 11) = Cells(Target.Row, 11).Value + 1
End Sub
dieser code zählt falsche Eingaben und setzt in Zelle k den wert immmer um eins hoch das funktioniert auch
Ich möchte nicht nur Spalte f auslesen sondern auch Spalte g und die falschen werte hochzählen lassen
und in den Spalten k und l die falschen Eingaben zählen lassen
habe schon vieles probiert leider weis ich nicht weiter
wäre froh wenn mir einer helfen könnte