Herbers Excel-Forum - das Archiv
Aufsteigend sortieren über Usreform
Informationen und Beispiele zu den hier genannten Dialog-Elementen:

|
Betrifft: Aufsteigend sortieren über Usreform
von: michael
Geschrieben am: 15.12.2003 14:19:35
Hallo alle zusammen
Ich habe in einer Zeile mehrere zugehörige Einträge In Spalte A (Kundennummer) in Spalte B (Familienname) in Spalte C (Vorname) usw. Ich trage über eine Userform neue Daten in eine neue Zeile ein und im Tabellenblatt selber sortiere ich dann die Spalte B mit der zugehörigen Zeile (Aufsteigend sortieren). Wie kann ich das über die Userform mit einem eigenen Button bewerkstelligen.
Danke für eure Hilfe
Michael
Betrifft: AW: Aufsteigend sortieren über Usreform
von: Ulf
Geschrieben am: 15.12.2003 14:22:05
Einfach Makro aufzeichnen.
Ulf
Betrifft: AW: Aufsteigend sortieren über Usreform
von: michael
Geschrieben am: 15.12.2003 14:25:46
Habe ich schon probiert. Wenn zb. der letzte Eintrag in der 500sten Zeile war dann wird auch immer ab der 500ste Zeile sortiert. Die Neueinträge ab Zeile 501 werden ignoriert
Gruß
Michael
Betrifft: AW: Aufsteigend sortieren über Usreform
von: Ulf
Geschrieben am: 15.12.2003 14:29:42
Glaube ich nicht, lad mal hoch.
Ulf
Betrifft: AW: Aufsteigend sortieren über Usreform
von: michael
Geschrieben am: 15.12.2003 14:41:46
Hallo Ulf
Ich hab's nochmal probiert inkl. Neustart. Neuer Eintrag in Zeile 909
Sub sortieren()
Range("A1:K909").Sort Key1:=Range("C909"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
Alle Einträge ab 910 werden nicht sortiert.
Sorry
Betrifft: AW: Aufsteigend sortieren über Usreform
von: Ulf
Geschrieben am: 15.12.2003 16:55:47
na das ist ja auch kein Wunder, wenn du den Bereich einschränkst:
Range("A1:K909").Sort
schreib mal:
Range("A1:K20000").Sort
Ulf
Betrifft: Es funktioniert
von: michael
Geschrieben am: 16.12.2003 07:07:59
Danke Ulf
Du hast mir sehr geholfen
Gruß
Michael