Subtotal in VBA
25.11.2005 16:43:33
Heinzs
ich möchte die die Variable gn_array mit ca. 60 Ziffern füllen, so daß der folgende Befehl mir 60 Teilergebnisse liefert
Ich hatte folgende Idee:
gn_max=60
redim gn_array (gn_max)
for i = 1 to 60
gn_array(í)= i+9
next i
Selection.Subtotal GroupBy:=5, Function:=xlSum, TotalList:=Array(gn_array), _
Replace:=True, PageBreaks:=False, SummaryBelowData:=True
Im letzten Statement erscheint Fehler 1004; Die Subtotal Methode des Range Objekts konnte nicht ausgeführt werden.
Anmerkung: gn_max kann variieren, deshalb kann die Liste nicht "händisch" gefüllt werden.
Bin für Hilfe dankbar.
Freundliche Grüße,
Heinz