Office: Macro: aus 6 aufeinanderfolgenden Zeilen Max-Wert kopieren

Hallo liebe Office-Hilfe-Community!

Habe mich mal nach längerer Zeit des mitlesens hier bei euch angemeldet,
da ich vor einem Problem stehe, welches ich nicht alleine lösen kann.

Folgendes:

Ich habe eine Tabelle mit Messwerten, ca. 100.000 Zeilen,
aus diesen möchte ich jeweils von 6 aufeinander folgenden Zeilen den Max-Wert ermitteln und in die nächste Spalte kopieren.
Letztendlich sollen dann von den 100.000 Messwerte ca. 16.000 (1/6) übrig bleiben.

Danke schon mal!
Gruß, Dennis

Beispiel:

A B
2 8
4 9
5
8
2
1
0
1
2
5
4
9


(Bild anzuhängen hat leider nicht geklappt...)

 

Hallo,

muss das ein Makro sein?

Wenn deine Werte in der Spalte A stehen und in A1 beginnen könnte man das z.B. mit der folgenden Formel machen:

=MAX(BEREICH.VERSCHIEBEN(A$1:A6;6*(ZEILE()-1);;6;))

Die kannst du einfach soweit wie notwendig nach unten kopieren.

 

Hallo Dennis,

ein Bild bring wenig, selbst Deine Version kann aus einem Bild keine Tabelle erstelle.
In B1 =MAX(INDIREKT("A" & (ZEILE()-1)*6+1&":"&"A" & (ZEILE()-1)*6+6))
und runterziehen.

Gruß Hajo

 

Super! Danke Peter, danke Hajo!
Beide Formeln funktionieren einwandfrei,
die Formel von Hajo hatte ich auch so schon ausprobiert, allerdings aufwendiger mit vielen zusätzlichen Zellen. :-?

Nochmals danke euch beiden, für die wirklich schnelle Hilfestellung!

Gruß, Dennis