eine kleine Frage hätte ich. wie bekomme ich es hin, dass bei ausführen des u.g Befehls das Array erweitert wird? Bei jedem ausführen des Befehls kommen 4 neue Spalten hinzu und bei denen hätte ich auch gerne in der Gruppierung die Teilergebnisse.
Range(Cells(2, 1), Cells(LetzteZeile2, 1)).EntireRow.Select
Selection.Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(5, 6, 7, 8, 9, 10) _, Replace:=True, PageBreaks:=False, SummaryBelowData:=True
In diesem Fall kriege ich die Summen in Spalte 5 bis 10. Beim nächsten Mal müsste es dann von 5 bis 14 gehen usw. Habe schon alles versucht das Array irgendwie als Variable zu erstellen, aber nichts hat funktioniert.
Wäre cool wenn jemand eine Idee hätte.
Vielen dank im Voraus