Counter
29.12.2007 14:51:29
Karel
Zähler lauft bei eintrag von Null (0) im Bereich von F10:F30
Frage: 1) wenn wert grosser als null ist, muss Zähler wider auf leer gesetzt werden also kein Null.
2) Bereich F10:F30 wird über sverweis von andere Tabelle eingetragen habe problem mit Calculate.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim reihe As Long
If Not Intersect(Target, Range("F10:F30")) Is Nothing Then
If Target.Value = "0" Then
reihe = Target.Row
Range("H" & reihe).Value = Range("H" & reihe).Value + 1
End If
End If
End Sub
Grusse
Karel