Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
992to996
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
992to996
992to996
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Sortieren einer Tabelle mit VBA

Sortieren einer Tabelle mit VBA
11.07.2008 14:24:00
Ralf
Hallo Excel - Experten,
ich habe eine Excel - Tabelle ( von A11 bis G500 )
Nun möchte ich diese Tabelle nach der Spalte G
aufsteigend sortieren ( mittels VBA ), wobei - und jetzt
kommt mein Problem - wobei die Tabelle auch länger
werden kann :-) d. h. nach unten offen.
Hat hierzu vielleicht jemand eine Idee ?
Viele Grüße
Ralf

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Sortieren einer Tabelle mit VBA
11.07.2008 14:27:16
Hajo_Zi
Hallo Ralf,
benutze den Makrorecorder, entferne Select und schreibe nur Range("A11").....

AW: Sortieren einer Tabelle mit VBA
11.07.2008 14:44:47
Ralf
Hallo Hajo,
in der ersten Zeile ( s.u. ) habe ich es so gemacht wie Du sagtest,
aber dann sagte mir Excel : Kompilierfehler :-( ?
'

Sub Sorten()
' Sorten Makro
' Makro am 11.07.2008 von Hollmann aufgezeichnet
'    Range("A12:G20").Select
'    Selection.Sort Key1:=Range("G12"), Order1:=xlAscending, Header:=xlNo, _
'        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
'        DataOption1:=xlSortNormal
'End Sub


Viele Grüße
Ralf

Anzeige
AW: Sortieren einer Tabelle mit VBA
11.07.2008 14:48:16
Hajo_Zi
Hallo Ralf,

Sub Sorten()
' Sorten Makro
' Makro am 11.07.2008 von Hollmann aufgezeichnet
'    Range("A12").Sort Key1:=Range("G12"), Order1:=xlAscending, Header:=xlNo, _
'        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
'        DataOption1:=xlSortNormal
'End Sub


Gruß Hajo

Danke Hajo Super :-)
11.07.2008 14:54:26
Ralf
....... oder Super - Hajo - Danke , paßt auch !!!
Klappt ganz toll !
Viele :-) Grüße
Ralf

AW: Danke Hajo Super :-)
11.07.2008 14:57:00
Kürzer

Sub Sorten()
' Sorten Makro
' Makro am 11.07.2008 von Hollmann aufgezeichnet
'    Range("A12").Sort Key1:=Range("G12"), Order1:=xlAscending, Header:=xlNo
'End Sub


Anzeige

312 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige