Rangformel in VBA
22.04.2021 10:25:20
Elmar
ich habe das Problem, dass ich in einer Pivottabelle aus immer den letzten 5 Spalten eine Summe bilde und dann aus der Summe den Rang.
Ich hab es hinbekommen, dass er mir die Summe immer abhängig vom Wort "Gesamtergebnis" in der nächsten Spalte bildet und das klappt auch, wenn es je nach Tage oder Feiertage mal ein oder zwei Spalten mehr oder weniger sind in meiner Pivot (da werden grundsätzlich immer die Werte der letzten 2 Wochen dargestellt).
Nun will ich aber neben der durch das Makro gebildeten Summenspalte noch eine Rangformel auf die Summenspalte machen. Das klappt solange gut, solange die Tabelle immer exakt 14 Tagen (14 Spalten) abbildet. Ist aber mal ein Feiertag dazwischen oder fallen die Sonntag in den zwei Wochen mal anders, dann sind es nur noch 13 Spalten und schon klappt die Rangformel nicht mehr. An Sonn- und Feiertagen gibt es eben keine Daten.
Wie bekomme ich es denn hin, dass der Rang immer aus der linken Spalte daneben gebildet wird, egal, wie viele Spalten die Pivottabelle insgesamt hat, das kann also mal in Spalte Q oder R oder S sein.
Mit meiner Formel unten klappt das nicht wirklich.....
ActiveCell.FormulaR1C1 = "=RANK(RC[-1],R25C17:R110C17,1)"
Vielleicht hat ja jemand einen guten Tipp
VG aus Bayern
Elmar