Sortieren

Forumthread: Sortieren
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Sortieren

Sortieren

19.09.2005 19:13:56

Fritz

Hallo Excel-Profis,
Ich übernehme aus einer Userform,
mit einer Textbox1 und fünf ComboBoxen die Werte in Tabelle1 ein.
(Die Textbox1 liest mir die fortlaufende Nummer aus dem Blatt aus)
ComboBoxen 1/2/3/4/5 = Spalte A/B/C/D/E
TextBox1 = Spalte F
SpalteA SpalteB SpalteC SpalteD SpalteE SpalteF
A 1 5 10 8 100
B 89 7 5 3 101
C 5 17 25 58 102
D 18 23 3 34 103
E 9 2 15 7 104
wenn ich nun in der ComboBox1 wieder ein A eingebe
setzt es mir dies in Reihenfolge A, was auch OK wäre
nur haut es danach mit den fortlaufenden Nummern nicht mehr hin
da diese nicht mehr in Reihenfolge sind.
Für einen Rat wäre ich sehr dankbar
Gruss
Fritz

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Sortieren

23.09.2005 00:37:27

MartinS

AW: Sortieren

23.09.2005 00:37:27

MartinS

Hallo Fritz,
wie sortierst du denn die Spalten, bzw. nach was sortierst du?
Wenn du nach Spalte A sortieren möchtest (alphabetisch) dann musst du in Excel immer auch alle anderen Spalten die zum zu sortierenden Bereich gehören mit angeben!
Also Spalten A-F markieren und anschließend nach Spalte A aufsteigend sortieren!
Makro wie folgt:


Sub Sortieren()
Columns("A:F").Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

Gruß,
Martin