Eingaben in Bereichen zählen
Frank
Mit folgendem Makro überprüfe ich, ob in den Spalten 3 und 10 Änderungen vorgenommen werden. Bei jeder Änderung wird der Wert in der mit Namen versehenen Zelle ("INPUT_CHECK") um 1 erhöht:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Colum = 3 Or Target.Column = 10 Then
Range("INPUT_CHECK").Value = Range("INPUT_CHECK").Value + 1
End If
End Sub
Vielen Dank schonmal!
Frank
Anzeige