Hallo Herber Fans,
ich bin wie so oft in der letzten Zeit in Sachen PivotTabelle unterwegs und habe heute auch wieder einige gute Codes realisieren können. Das schöne daran ist, daß heute bisher alles in Eigenregie mit dem hier im Forum Gelernten entwickelt werden konnte.
Nun hänge ich aber doch fest. Vielleicht ist es schon zu spät, aber auch mit der Hilfe des Forumarchives bekomme ich es nicht hin.
Ich möchte eine Collection bilden – und zwar aus den Längen von PivotItems eines Spaltenfeldes, die ich über eine For Each Schleife einzeln ermittle und einer Collection über Add hinzufüge.
Wenn die Schleife für alle PivotItems durchgelaufen ist, dann möchte ich den Maximalwert der Collection über die WorksheetFunction.Max ermitteln. Dort hänge ich gnadenlos fest, obwohl es vermutlich banal ist.
Des Weiteren frage ich mich, ob ich aus einer Collection auch andere Werte ermitteln kann. Bspw. möchte ich nicht nur den Min oder Max Wert ermitteln, sondern über einen Index möchte ich aus der Collection bspw. den 2. Wert rausziehen. Also z.B. MsgBox „Der zweite Wert der Collection ist:“ & Coll(2).Value.
Ich würde mich sehr, sehr freuen, wenn mir jemand sagen kann, ob und wie ich es lösen kann, wo mein Denkfehler in dem, an sich kurzen, Code ist. Ich habe schon oft über Collection und Array nachgedacht, um eine solche Sammlung erst anzulegen und dann anderweitig auszuwerten, aber nie realisieren können.
https://www.herber.de/bbs/user/53960.xls
Vielen Dank für Eure Hilfe und allen hier ein schönes Wochenende.
Gruß aus Berlin, Andreas