Sortieren von einer Spalte mit VBA
20.11.2003 15:21:29
Norbert
ich würde mich sehr über Hilfe bei meinem Problem freuen.
Und zwar:
Ein Tabellenblatt ist mit Daten gefüllt (Spalte A bis M). Die erste Zeile ist mit einem Autofilter versehen.
Ich möchte nun mithilfe der Excel-Funktion "Sortieren" im Menü "Daten" mit VBA die Daten in dem Tabellenblatt nach 2 Kriterien sortieren.
Dazu habe ich ein Makro aufgezeichnet, das folgendes liefert:
Selection.Sort Key1:=Range("E2"), Order1:=xlAscending, Key2:=Range("F2") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
Wenn ich das aber in meinen Skript kopiere, macht Excel das nicht:
Laufzeitfehler, Sortierbezug ist ungültig!
Danach möchte ich mithilfe der Excel-Funktion "Teilergebnisse" im Menü "Daten" mit VBA unter den dortigen Menüpunkten "Verwendung von Summe" und "Teilergebnis addieren zu" die Summen der 2 Spalten I und M bilden.
Wieder habe ich dazu ein Makro aufgenommen, um die VBA-Syntax anzusehen:
Selection.Subtotal GroupBy:=6, Function:=xlSum, TotalList:=Array(9, 13), _
Replace:=False, PageBreaks:=False, SummaryBelowData:=True
Auch dies wird in meinem Skript nicht ausgeführt; dazu kommt er aber gar nicht, weil die Sortierung schon fehlschlägt!
Weiß hier jemand Abhilfe von euch!!
Ein herzliches Dankeschön!
Gruß, Norbert