24 Zahlen

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo,
so müsste es gehen.
Mit Formel:

	A	B
1	33	0
2	10	1
3	12	2
4	16	3
5	19
6	32	5
7	9	6
8	10
9	8
10	34
11	4
12	15	11
13	7
14	9	13
15	9	14
16	16
17	35
18	7	17
19	16	18
20	12
21	21	20
22	24
23	22
24	4	23
25
26		25
27		26
28		27
29		28
30		29
31		30
32		31
33
34
35

Formeln der Tabelle

Zelle	Formel
B1	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B2	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B3	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B4	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B5	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B6	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B7	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B8	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B9	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B10	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B11	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B12	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B13	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B14	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B15	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B16	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B17	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B18	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B19	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B20	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B21	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B22	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B23	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B24	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B25	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B26	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B27	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B28	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B29	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B30	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B31	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B32	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B33	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B34	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)
B35	=WENN(ZÄHLENWENN(A:A;ZEILE()-1)>0;"";ZEILE()-1)

Mit VBA und sortieren:

Option Explicit

Sub SucheFehlende()
Dim Bereich As Range
Set Bereich = Range("B1:B35")
    Bereich.FormulaR1C1 = "=IF(COUNTIF(C[-1],ROW()-1)>0,"""",ROW()-1)"
    Bereich.Value = Bereich.Value

    Bereich.Sort Key1:=Bereich(1), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
End Sub

Ergebnis sieht so aus:

	A	B
1	33	0
2	10	1
3	12	2
4	16	3
5	19	5
6	32	6
7	9	11
8	10	13
9	8	14
10	34	17
11	4	18
12	15	20
13	7	23
14	9	25
15	9	26
16	16	27
17	35	28
18	7	29
19	16	30
20	12	31
21	21
22	24
23	22
24	4

Gruß Tino

Hi zusammen,
jetzt noch eine etwas kürzere Abbruchbedingung zu Franz' und Walters Formel:

	A	B	C	D	E	F	G
1	2	0	0	0	0	0	0
2	15	1	1	1	1	1	1
3	7	4	4	4	4	4	4
4	15	6	6	6	6	6	6
5	10	9	9	9	9	9	9
6	32	11	11	11	11	11	11
7	31	14	14	14	14	14	14
8	26	16	16	16	16	16	16
9	5	19	19	19	19	19	19
10	33	22	22	22	22	22	22
11	18	24	24	24	24	24	24
12	27	25	25	25	25	25	25
13	30	28	28	28	28	28	28
14	20	29	29	29	29	29	29
15	17	35	35	35	35	35	35
16	23	36	36	36	36	36	36
17	3	#ZAHL!	#ZAHL!	0
18	13	#ZAHL!	#ZAHL!	0
19	12	#ZAHL!	#ZAHL!	0
20	8	#ZAHL!	#ZAHL!	0
21	34	#ZAHL!	#ZAHL!	0
22	21	#ZAHL!	#ZAHL!	0
23	17	#ZAHL!	#ZAHL!	0
24	20	#ZAHL!	#ZAHL!	0

Formeln der Tabelle

Zelle	Formel
B1	{=KKLEINSTE(WENN(ISTFEHLER(VERGLEICH(ZEILE($1:$37)-1;(A$1:A$24); 0)); ZEILE($1:$37)); ZEILE(A1))-1}
C1	{=WENN(ZEILE()>37-SUMME(--(HÄUFIGKEIT(N(A1:A36<37); {1.0})>0)); ""; KKLEINSTE(WENN(ISTFEHLER(VERGLEICH(ZEILE($1:$37)-1;(A$1:A$24); )); ZEILE($1:$37)); ZEILE())-1)}
D1	{=REST(MIN(KKLEINSTE((HÄUFIGKEIT(A$1:A$24;ZEILE($1:$37)-1)>0)*37+ZEILE($1:$38)-1;ZEILE(A1)); 37); 37)}
E1	{=WENN(ZEILE(A1)>ANZAHL(WENN(ISTFEHLER(VERGLEICH(ZEILE($1:$37)-1;(A$1:A$24); 0)); ZEILE($1:$37))); "";KKLEINSTE(WENN(ISTFEHLER(VERGLEICH(ZEILE($1:$37)-1;(A$1:A$24); 0)); ZEILE($1:$37)); ZEILE(A1))-1)}
F1	{=WENN(SUMME(1/ZÄHLENWENN($A$1:$A$24;$A$1:$A$24))<38-ZEILE(); KKLEINSTE(WENN(ISTFEHLER(VERGLEICH(ZEILE($1:$37)-1;(A$1:A$24); 0)); ZEILE($1:$37)); ZEILE(A1))-1;"")}
G1	{=WENN(SUMME(1/ZÄHLENWENN($A$1:$A$24;$A$1:$A$24))<38-ZEILE(); REST(MIN(KKLEINSTE((HÄUFIGKEIT(A$1:A$24;ZEILE($1:$37)-1)>0)*37+ZEILE($1:$38)-1;ZEILE(A1)); 37); 37); "")}

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

Matrix verstehen

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Beliebteste Forumthreads (12 Monate)

	A	B
1	33	0
2	10	1
3	12	2
4	16	3
5	19
6	32	5
7	9	6
8	10
9	8
10	34
11	4
12	15	11
13	7
14	9	13
15	9	14
16	16
17	35
18	7	17
19	16	18
20	12
21	21	20
22	24
23	22
24	4	23
25
26		25
27		26
28		27
29		28
30		29
31		30
32		31
33
34
35

	A	B
1	33	0
2	10	1
3	12	2
4	16	3
5	19	5
6	32	6
7	9	11
8	10	13
9	8	14
10	34	17
11	4	18
12	15	20
13	7	23
14	9	25
15	9	26
16	16	27
17	35	28
18	7	29
19	16	30
20	12	31
21	21
22	24
23	22
24	4

	A	B
1	33	0
2	10	1
3	12	2
4	16	3
5	19
6	32	5
7	9	6
8	10
9	8
10	34
11	4
12	15	11
13	7
14	9	13
15	9	14
16	16
17	35
18	7	17
19	16	18
20	12
21	21	20
22	24
23	22
24	4	23
25
26		25
27		26
28		27
29		28
30		29
31		30
32		31
33
34
35

	A	B
1	33	0
2	10	1
3	12	2
4	16	3
5	19	5
6	32	6
7	9	11
8	10	13
9	8	14
10	34	17
11	4	18
12	15	20
13	7	23
14	9	25
15	9	26
16	16	27
17	35	28
18	7	29
19	16	30
20	12	31
21	21
22	24
23	22
24	4

13 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

13
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

	A	B
1	33	0
2	10	1
3	12	2
4	16	3
5	19
6	32	5
7	9	6
8	10
9	8
10	34
11	4
12	15	11
13	7
14	9	13
15	9	14
16	16
17	35
18	7	17
19	16	18
20	12
21	21	20
22	24
23	22
24	4	23
25
26		25
27		26
28		27
29		28
30		29
31		30
32		31
33
34
35

	A	B
1	33	0
2	10	1
3	12	2
4	16	3
5	19	5
6	32	6
7	9	11
8	10	13
9	8	14
10	34	17
11	4	18
12	15	20
13	7	23
14	9	25
15	9	26
16	16	27
17	35	28
18	7	29
19	16	30
20	12	31
21	21
22	24
23	22
24	4