" Hat jemand eine gute Idee "
Autofilter -> Mittelwert pro Area.
Hallo Christian,
setze mal ein Autofilter auf das Blatt.
Setze das Filterkriterium auf "Ja" und beobachte die Zeilenbeschriftung. Diese wird blau also quasi gruppiert angezeigt.
Diese "Gruppierung" lässt sich in VBA ansprechen. Die Gruppierung ist tatsächlich eine Eigenschaft, gehört zum Range-Objekt und wird Area genannt.
Pro Gruppierung, eine Area.
Pro Area, ein Mittelwert. (arithmetischer Mittelwert?)
Jetzt durchläuft Du vom Autofilter.Range alle Areas bzw packst die Areas in die Funktion Mittelwert und musst nurnoch angeben wohin das Ergebnis geschrieben werden soll.
Klingt komisch , is aber so :)
|