Anzeige
Archiv - Navigation
536to540
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
536to540
536to540
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Range in einem Makro

Range in einem Makro
27.12.2004 11:07:23
Fritz
Hallo Excelfreunde,
kann mir jemand mit einem Makro Befehl helfen, ich habe ein kleines Testmakro beigelegt, das Datensätze sortiert. Es ist ein reiner Test die Echtdatei ist wesentlich komplexer.
Was kann ich tun dass beim Aufzeichnen des Makros die Range des sortierens immer der Datenbankgröße angepasst wird.

Sub Test()
' Test Makro
' Makro am 27.12.2004 von Friedrich aufgezeichnet
Range("A1").Select
Range("A1:B19").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:= _
xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub

Vielen Dank für Euer Interesse
Gruß Fritz

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Range in einem Makro
Ramses
Hallo
ohne deine Datei zu kennen und ungetestet
Activesheet.usedrange.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:= _
xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Gruss Rainer
AW: Range in einem Makro
27.12.2004 11:10:49
Matthias
Hallo Fritz,
sortiere doch immer die ganzen Spalten:
Sub Test()
Range("A:B").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:= _
xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
Gruß Matthias
AW: Range in einem Makro
27.12.2004 11:11:47
Hajo_Zi
Hallo Fritz,
falls Die tabelle keine Leerzeilen oder Spalten enthält.
Range("A1").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:= _
xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


Anzeige
AW: Range in einem Makro
ransi
hallo fritz
ungetestet aber versuchs mal so:
Range("A:A").Sort Key1:=Range("A2"), ...
ransi

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige