Dubletten in zwei Zahlenreihen zählen

[RPP63]

Moin zusammen!
Ich stehe gerade ein wenig auf dem Schlauch … 
Fällt jemandem eine einfache Formel ein, welches mir das gewünschte Ergebnis 3 auswirft?

	A	B	C	D	E	F
1	Tipp
2	3	5	13	14	38	39
3
4	Ziehung
5	1	3	12	13	39	48

Zelle	bedingte Formatierung...	Format
A5	1: ZÄHLENWENN($A2:$F2;A5)	abc

Ich habe es erfolglos mittels Summenprodukt versucht, aber das klappt nur, wenn die Dubletten an der selben Stelle in den Matrizen steht.
Mittels VBA ist es ja einfach:

Code:

Function GK&(Ziehung As Range, Tipp As Range)
Dim Zelle As Range
For Each Zelle In Ziehung
 If WorksheetFunction.CountIf(Tipp, Zelle) Then GK = GK + 1
Next
End Function

ergibt die gewünschten 3:

	A	B	C	D	E	F
1	Tipp
2	3	5	13	14	38	39
3
4	Ziehung
5	1	3	12	13	39	48
6
7	3

Zelle	Formel
A7	=gk(A5:F5;A2:F2)

Wer hilft, den Knoten zu entwirren?

Gruß Ralf

[shift-del]

Moin Ralf

Meinst du das?

Code:

=SUMMENPRODUKT(ZÄHLENWENNS(A2:F2;A5:F5))

=SUMME(--(HÄUFIGKEIT(A2:F2;A5:F5)=1))

[RPP63]

Prima, Detlef!

Besten Dank und schönen Restfeiertag!

Gruß Ralf

[RPP63]

Nur zur Erklärung, wofür ich dies brauchte:
Es geht um die Visualisierung der Gewinnklasse beim Lotto:

	A	B	C	D	E	F	G	H	I	J	K	L	M	N	O	P	Q
1	Tipp						SZ
2	3	5	13	14	38	39	5		Gewinnklasse
3									9	8	7	6	5	4	3	2	1
4	Ziehung						SZ		2+Z	3	3+Z	4	4+Z	5	5+Z	6	6+Z
5	1	3	12	13	39	48	5					ü
6	2	5	14	15	39	49	7				ü

Zelle	Formel
I5	=WENN(SUMMENPRODUKT(ZÄHLENWENN($A$2:$F$2;$A5:$F5))+($G5=$G$2)=SPALTE(A1);"ü";"")

Zelle	bedingte Formatierung...	Format
F5	1: ZÄHLENWENN($A$2:$F$2;F5)	abc
G5	1: G5=G$2	abc

[neopa]

Hallo Ralf,

ich bin kein Lottospieler und weiß deshalb nicht, was "ü" bedeutet und auch nicht, was Du damit genau meinst.
Evtl. hast Du ja einen anderen Schriftfont für ein Sonderzeichen im Einsatz, welcher hier nur als "ü" dargestellt wurde. Oder?

Die richtige Gewinnklasse wird mit Deiner Formel aber damit mE nicht gekennzeichnet.

Dafür schlage ich  (für Dein Beispielliste) z.B. folgende für I5 vor:

Code:

=(SUMMENPRODUKT(ZÄHLENWENN($A$2:$F$2;$A5:$F5))+($G$2=$G5)%=LINKS(I$4;1)+(RECHTS(I$4;1)="Z")%)+0

wobei ich zusätzlich das benutzerdefinierte Zahlenformat: "ü";;  eingesetzt habe.

[WillWissen]

Hi Werner,

"ü" mit Wingdings formatiert gibt ein Häkchen.

[RPP63]

Danke Werner!
Ich hatte es zwischenzeitlich auch bemerkt, dass meine Version fehlerhaft ist.
Ich wollte auch zunächst mit %% arbeiten, habe dann einfach Hilfsspalten benutzt, die ich ausgeblendet habe.
Und ja: das ü ergibt in Wingdings einen Haken (EDIT: Ich sehe Günters Antwort erst jetzt).

	M	N	O	P	Q	R	S	T	U	Y	Z	AA	AB	AC	AD	AE	AF	AG	AH	AI	AJ
1								9
2	Tipp	3	5	13	14	38	39	SZ		2+Z	3	3+Z	4	4+Z	5	5+Z	6	6+Z
3	1	3	5	7	13	28	47	9				ü							3	+Z	3+Z
4	2	4	14	38	39	41	49	1			ü								3		3

Zelle	Formel
AG3	=WENN($AJ3=AG$2;"ü";"")
AH3	=SUMMENPRODUKT(ZÄHLENWENN(N$2:S$2;N3:S3))
AI3	=WENN(T3=T$1;"+Z";"")
AJ3	=AH3&AI3

Zelle	bedingte Formatierung...	Format
S3	1: ZÄHLENWENN($N$2:$S$2;S3)*(S3<>"")	abc
T3	1: Zellwert ist gleich =$T$1	abc
Y3	1: Y3="ü"	abc

Zelle	Schriftart	Inhalt
Y3	Wingdings

Wer Interesse hat, kann sich meine Spielerei ja mal ansehen.
Sind allerdings Makros enthalten, die man aktivieren muss.

Gruß Ralf

[Elex]

Hi

Oder mit nur einer Spalte für das meist traurige Ergebnis.

____|_A|_B|_C_|_D_|_E_|_F_|_G_|_H|__I_|
   1|  |  |   |   |   |   |SZ |  |    |
   2| 3| 5| 13| 14| 38| 39|  5|  |    |
   3|  |  |   |   |   |   |   |  |    |
   4|  |  |   |   |   |   |SZ |  |    |
   5| 1| 3| 12| 13| 39| 48|  5|  |3 S |
   6| 2| 5| 14| 15| 39| 49|  7|  |3   |

I5    {=INDEX({"";"";"";"";"2 S";3;"3 S";4;"4 S";5;"5 S";6;"6 S"};SUMME(ZÄHLENWENN(A5:F5;$A$2:$F$2))*2+($G$2=G5))}

Gruß Elex