Anzahl jeder zweiten Zeile in einer Spalte zählen

Question

Hallo zusammen,

ich habe folgendes Szenario:

In einer Spalte sind ca. 200 Zeilen.

Dabei ist in jeder ungeraden Zeile das Plandatum und in manchen Zeiln ist das IST-Datum eingetragen. Außerdem ist in machen geraden Zeilen das IST-Datum eingetragen.

Demnach sieht die Spalte folgenderweise aus:

28.08.10
30.08.10
02.09.10
05.09.10
etc.

In der letzten Zeile soll die Anzahl der geraden Zeilen angegeben werden, die ein IST-Datum enthalten.

Ich habe bereits versucht, die Anzahl-Funktion zu verwenden und dabei die einzelnen Zeilen mit einem Semikolon abgetrennt zu zählen. Hier ist die Anzahl anzugebender Zeilen leider begrenzt.

Kannn mir jemand weiterhelfen?

Vielen Dank!!

Chuck

Answer 1

Erröffne eine neue Spalte in der du untereinander 01010101 schreibst.
Kannst du auch mit PLAN und IST machen.
Also :
0
1
0
1
0
1
0

Dann markierst du alle Zeilen in der Spalte und drückst Strg+U damit diese Reinfolge sich fortsetzt. Dann kannst du einfach mit einer ZÄHLENWENN IST und PLAN Daten Zählen lassen.

Ganz Sauber ist es nicht aber da du keine Spalten hast die eindeutig sagen das es genau das Datum ist und diese auch zusammenhängen, geht es nicht ander fürchte ich.

Wobei mir das Zählen keinen Sinn macht, wenn du 200 Zeilen hast und immer ein PLAN und ein IST Datum vorhanden ist, brauchst du diese Anzahl doch nur durch 2 zu teilen. Oder?

Answer 2

Hallo Chuck,[b]

das geht mit dieser Formel

=SUMMENPRODUKT((REST(ZEILE(1:100);2)=0)*(ISTZAHL(A1:A100)))

Wenn Du mehr als 100 Zeilen auswerten willst, dann ersetze in der Formel die 100 (2 mal) durch den tatsächlichen Zeilenindex.

Gruss
Rainer

Answer 3

Vielen Dank für die rasche Antworten!

Die zweite Zeile darf aber nur dann gezählt werden, wenn ein Datum in diese Zeile eingetragen wird.

@ Rainer: Mit dieser Formel wird jede zweite Zeile gezählt unabhängig davon, ob ein Datum eingetragen wird oder nicht. Gibt es eine Lösung hierzu?

Vielen Dank noch einmal!

Chuck

Answer 4

Hallo Chuck,

meine Formel zählt alle Zahlenwerte in den geraden Zeilen im relevanten Bereich.

D.h. es werden auch beliebige Zahlenwerte mit gezählt. (ein Datum ist für Excel auch nur eine Zahl)

Wenn also Daten und Zahlen in den geraden Zeilen stehen, hilft Dir nur ein Makro, welche so aussehen könnte.
Die gesuchte Anzahl wird in der ersten freien Zelle unterhalb der Daten ausgegeben.

Option Explicit

Sub anzahl()
Dim rngC As Range, intZ As Integer
For Each rngC In ActiveSheet.Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row)
If IsDate(rngC.Value) And rngC.Row Mod 2 = 0 Then
intZ = intZ + 1
End If
Next
ActiveSheet.Range("A" & Cells(Rows.Count, 1).End(xlUp).Row + 1).Value = intZ
End Sub

Gruss
Rainer

Answer 5

Danke, Rainer! Jetzt funktioniert alles.
Chuck