Office: Makro gesucht, ohne Zwischenschritte in Zellen zu schreiben

Hallo,

Ich habe 2 Tabellenblätter mit folgenden Namen:
Datenblatt
Ergebnisblatt

Im Datenblatt befinden sich im Bereich B3:B1000 die Zahlenwerte.

Jetzt soll Folgendes passieren:
C3=B3
C4=B4-B3
C5=B5-B4
C6=B6-B5
...
C1000=B1000-B999

(die erste Zeile berechnet sich anders)

Dann soll die folgende Formel in das Ergebnisblatt in A2 eingefügt werden:
Zählenwenn(C3:C;"<0") oder Zählenwenn(C3:C1000;"<0")
(Was dann besser in VBA zu verwirklichen ist.)

Das bedeutet, alle Ergebnisse aus C, welche negativ sind sollen gezählt werden und die Anzahl in Ergebnisblatt A2 geschrieben werden.

Nun möchte ich das aber als Makro, ohne die Werte in C3 bis C1000 extra in Zellen zu schreiben, damit es schneller geht. (In Wirklichkeit sind es nicht nur 1000 Werte sondern VIEL mehr.)

Kann mir jemand helfen und das dann auch etwas erklären? Ich danke sehr.
LG

 

Hallo!

Wozu ein Makro, wenn doch eine einzige Formel reicht?

=SUMMENPRODUKT((B4:B1000<>"")*(B4:B1000<B3:B999))+(B3<0)

 

Super, na klar! An was man alles denken kann... :)
DANKE