Maximum Wert in Spalte mit Leerzeilen dazwischen

24/03/2008 - 21:34 von Thom | Report spam
Hallo liebe NG

Es ist kompliziert mein Anliegen zu formulieren. In der Spalte der
Produktegruppe habe ich Eintràge mit Werten. Es gibt untereinander diverse
solcher Produktegruppen. In einer Separaten Spalte sollte jeweils der
Maximalwert der Produktegruppe sein. Da die Produktegruppen unterschiedliche
Eintràge (einmal 4 einmal 20 oder mehr) haben, ist der Bereich nicht immer
der selbe.

Ich suche eine Formel, die automatisch die leerzeile oben und unten bemerkt
und dann nur der Bereich dazwischen berechnet.

Hier eine Musterdatei zum besseren Verstàndnis.
http://www.conzeptx.ch/TLOG/test.xls

Danke im Voraus für mögliche Tipps.

Gruss Thom
 

Lesen sie die antworten

#1 Andreas Killer
25/03/2008 - 12:17 | Warnen spam
Ich suche eine Formel, die automatisch die leerzeile oben und unten bemerkt
und dann nur der Bereich dazwischen berechnet.

Hier eine Musterdatei zum besseren Verstàndnis.http://www.conzeptx.ch/TLOG/test.xls


Ist mit einer Formel IMHO wohl schwerlich zu machen, mit VBA ist's
ganz einfach:

Function MaxW(ByVal ErsteZelle As Range) As Double
'Durchlàuft alle Zellen ab ErsteZelle nach unten bis zur einer
leeren Zelle, gibt den größten Wert zurück
Dim Temp As Double, X As Integer, Y As Integer

'Position der ersten Zelle
X = ErsteZelle.Column
Y = ErsteZelle.Row
'Wert der ersten Zelle
Temp = ErsteZelle.Value
'Durchlaufe alle Zellen nach unten bis zu einer leeren Zelle
Do While Cells(Y, X) <> ""
'Ist der Wert größer als der bisher gefundene?
If Cells(Y, X).Value > Temp Then Temp = Cells(Y, X).Value
'Haben wir das Ende des Tabellenblattes erreicht?
If Y = Rows.Count Then Exit Do
'Nàchste Zelle
Y = Y + 1
Loop
'Wert zurückgeben
MaxW = Temp
End Function

(Mappe öffnen, Alt-F11 drücken, Menü Einfügen/Modul, obigen Text
einfügen, Fenster zu)

In Deine Ergebniszelle gibt's Du z.B. nun =MaxW(C6) ein, speichern,
fertig.

Wenn Du eine Function suchst die automatisch alle Produktgruppen in
einer Spalte berechnet, dann musst Du uns sagen wo die Ergebnisse
ausgegeben werden sollen.

Andreas.

Ähnliche fragen