Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
836to840
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
836to840
836to840
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zählenwenn

Zählenwenn
15.01.2007 09:23:18
Bärbel
Hallo
Kann man eigendlich Veränderungen einer Zelle Zählen?
mit -zählenwenn- wieoft sich der Wert in einer Zelle ändert.
Gruß Bärbel

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zählenwenn
15.01.2007 09:37:01
chris
das geht nur mit VBA
gruß Chris
Den Code in das Codemodul des tabellenblattes kopieren.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Cells(1, 5) = Cells(1, 5) + 1
End If
End Sub

AW: Zählenwenn
15.01.2007 09:53:24
Bärbel
Hallo Chris
vielen Dank funktioniert sehr gut.
Kannst du das auch auf alle Zeilen anwenden.
Also von A1 bis A1500 ?
Bruß Bärbel
AW: Zählenwenn
15.01.2007 10:01:25
EtoPHG
Hallo Bärbel,

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, ActiveSheet.Range("A:A")) Is Nothing Then Exit Sub
Target.Offset(0,5).Value = Target.Offset(0,5).Value + 1
End Sub

Gruss Hansueli
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige