Aufsteigend sortieren

Forumthread: Aufsteigend sortieren

Heinz

Hallo Leute
Wie kann ich bitte diese Tabelle nach Spalte H aufsteigend sortieren ?
Gruß
Heinz
Zuschauer

	E	F	G	H
1	R.1	Sa 18.Jul.09	SV Mattersburg	9.763
2	R.2	Fr 24.Jul.09	FK Austria Wien	8.541
3	R.4	Sa 08.Aug.09	KSV Superfund Kapfenberg	6.456
4	R.6	Sa 29.Aug.09	SC Magna Wr. Neustadt	4.699
5	R.8	Mi 23.Sep.09	SK Austria Kelag Kärnten	2.426
6	R.10	Sa 03.Okt.09	SV Josko Ried	9.763
7	R.13	Mi 28.Okt.09	FC Red Bull Salzburg	8.764
8	R.15	Sa 07.Nov.09	SK Rapid Wien	10.971
9	R.17	Sa 28.Nov.09	SK Puntigamer Sturm Graz	3.642
10	R.20	Sa 13.Feb.10	SK Rapid Wien	12.768
11	R.22	Sa 27.Feb.10	SK Puntigamer Sturm Graz	6.221
12	R.24	Sa 13.Mrz.10	SK Austria Kelag Kärnten	2.178
13	R.26	Mi 24.Mrz.10	KSV Superfund Kapfenberg	5.123
14	R.27	Sa 27.Mrz.10	SV Josko Ried	8.458
15	R.29	Sa 10.Apr.10	SC Magna Wr. Neustadt	1.124
16	R.31	Sa 17.Apr.10	FC Red Bull Salzburg	3.021
17	R.33	Sa 01.Mai.10	FK Austria Wien	13.468
18	R.35	Sa 08.Mai.10	SV Mattersburg	9.011

Formeln der Tabelle

Zelle	Formel
E1	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F1	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G1	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H1	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E2	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F2	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G2	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H2	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E3	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F3	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G3	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H3	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E4	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F4	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G4	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H4	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E5	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F5	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G5	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H5	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E6	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F6	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G6	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H6	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E7	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F7	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G7	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H7	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E8	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F8	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G8	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H8	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E9	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F9	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G9	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H9	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E10	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F10	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G10	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H10	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E11	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F11	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G11	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H11	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E12	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F12	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G12	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H12	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E13	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F13	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G13	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H13	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E14	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F14	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G14	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H14	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E15	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F15	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G15	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H15	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E16	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F16	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G16	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H16	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E17	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F17	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G17	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H17	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
E18	{=INDIREKT("A"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
F18	{=INDIREKT("B"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
G18	{=INDIREKT("C"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}
H18	{=INDIREKT("D"&KKLEINSTE(WENN($A$1:$A$100<>0;ZEILE($1:$100); 101); ZEILE()))}

Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!

Matrix verstehen

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: Aufsteigend sortieren

Adelhorst
AW: Aufsteigend sortieren

Heinz

AW: Aufsteigend sortieren

15.07.2009 10:56:59

Adelhorst

Hallo Heinz.
Du hast doch Erfahrung mit dem Recorder? Ich habe gerade auch nur kurz aufgenommen, was ich getan habe und folgendes Macro ist dabei herausgekommen:
Sub Makro3() Columns("E:H").Select Range("E4").Activate Selection.Copy Columns("I:I").Select Range("I4").Activate Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=False Application.CutCopyMode = False Selection.Sort Key1:=Range("L1"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom End Sub Dieses Macro macht folgendes:
1. Es kopiert die Spalten "E:H" und fügt 'Inhalt einfügen-Werte" ab Spalte "I" ein;
2. 'Daten sortieren' nach Spalte "L" aufsteigend.
Ich glaube nicht, dass es anders gehen wird, denn die Tabelle ist ja schon eine sortierte Auswahl der Werte einer anderen Tabelle. Da stecken Formeln drin, und die kann man nicht sortieren. Also musst du dir die Werte da herausholen und an anderer Stelle erneut sortieren.
Mit dem Macro kannst du das ja dann immer wieder erneut auslösen. Ein Button auf dem Tabellenblatt kann dieses Macro auch starten lassen.
Vielleicht ist dir damit geholfen?
Gruss Adelhorst

AW: Aufsteigend sortieren

15.07.2009 11:54:52

Heinz

Hallo Adelhorst
Habe es am Anfang mit Ma´crorecorder probiert-Ohne Erfolg
Weiter getestet jetzt funktioniert es so halbwegs mit
Option Explicit

Sub Zuschauer_Heimspiel()
'Sortieren für Zuschauer Heimspiele
Application.ScreenUpdating = False
ActiveSheet.Unprotect
Range("A1:D36").Select
Selection.Sort Key1:=Range("D1"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
ActiveSheet.Protect
Application.ScreenUpdating = True
End Sub

Danke recht herzlich
Gruß
Heinz

Beliebteste Forumthreads (12 Monate)

Forumthread: Aufsteigend sortieren

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread