Office: (Office 2013) Kombinationen als Matrix ausgeben

Hallo zusammen,

ich wollte fragen, ob folgendes Vorhaben funktioniert und wenn ja, ob ihr eine Idee dazu habt?

Ich habe 6 Farben, welche ich jeweils in dreier-Gruppen kombinieren kann.
(z.B. blau-gelb-rot, rot-grün-blau, rot-blau-gelb, etc.)

Mit untenstehender Formel kann ich die Anzahl der eindeutigen Kombinationen ausrechnen (Kombinationen mit Wiederholungen):
(n + m - 1)! / ((n - 1)! * m!) = 56 für n: 6 und m: 3.

Was jetzt interessant wäre, wenn mir Excel in einer Matrix genau die 56 Kombinationen auflöst bzw. darstellt.
Also 3 Spalten und 56 Datensätze.

blau - gelb - rot
blau - rot - grün
blau - rot - lila
blau - gelb - lila
etc....

Kann man da etwas programmieren?

Besten Dank vorab!

:)

 

http://www.excelformeln.de/formeln.html?welcher=346

Danach gibt es ohne Wdh. 20 Kombinationen (Dein "mit Wdh." habe ich aufgrund des Beispiels uminterpretiert).

Deine Formel ist mir so nicht bekannt. Die korrekte steht im Link unter der Tabelle.

 

Hallo,

oder mit ein paar Schleifen als Makro:

ohne Wiederholung und ohne Berücksichtigung der Reihenfolge:
Code:

Mit Berücksichtigung der Reihenfolge und mit Wiederholungen:
Code:

Grüße
EarlFred

 

Hallo lupo,

Danke für die schnelle Antwort.

Mein Problem bezieht sich jedoch auf die Kombinationen mit Wiederholungen:

http://www.mathebibel.de/kombination-mit-wiederholung

Daraus ergeben sich die 56 möglichen Kombinationen.
Die Excel-Formel dazu: =KOMBINATIONEN2(6;3)

Und was ich daraus bräuchte wäre dann die Auflistung dieser 56 Kombinationen :-)

 

Hallo Earl-Fred,

vielen Dank für die Codes, die funktionieren super.

Aber auch hier, ich bräuchte das Phänomen:

Kombination mit Wiederholung - Mathebibel.de

Viele Grüße und sorry für die Verwirrung bzgl. mit/ ohne Wiederholung und mit/ ohne Reihenfolge

 

Hallo,

na, das ist dann doch ebenso leicht:

Mit Wiederholungen, ohne Beachtung der Reihenfolge
Code:

Grüße
EarlFred

 

Hallo,

finde den VBA Code super!!!

Eine Frage dazu habe ich - wie bekomme ich das ungefähr so hin?

Tabelle2

	E	F	G
2	Merkmal 1	Merkmal 2	Merkmal 3
3	x
4	x	x
5	x	x	x
6		x
7		x	x
8	x		x
9			x

Excel Tabellen im Web darstellen >>

 

Du kannst die Tabelle von EarlFred um folgende Formel ergänzen:
.mcs{margin-top:5pt;}.mcs table{border-collapse:collapse;}.mcs table td{border:1px solid #999999;color:#000000;background-color:#FFFFFF;font:11pt Calibri, sans-serif;padding:1pt 2pt;text-align:left;vertical-align:middle;}.mcs .foot td{border:0;font-size:9pt;color:#888888;padding:0;}.mcs .foot{clear: both;}.mcs .foot td{background-color:transparent;}.mcs .sheet td:first-child{background-color:#ddddee;text-align:center;}.mcs .sheet thead td{background-color:#ddddee;text-align:center;}.mcs .sheet tr:first-child td{background-color:#ddddee;text-align:center;}.mcs .r{text-align:right;}.mcs .formulas tr:first-child td{background-color:#eeaaaa;}.mcs .cond tr:first-child td{background-color:#aaaaee;}.formats, .names, .formulas, .cond, .fonts, .valid{float: none;margin: 10pt 10pt 0 0;}

Arbeitsblatt mit dem Namen 'Tabelle1'
	A	B	C	D	E	F	G	H
1				rot	gelb	grün	weiß	schwarz
2	rot	rot	rot	3	0	0	0	0
3	rot	rot	gelb	2	1	0	0	0
4	rot	rot	grün	2	0	1	0	0
5	rot	rot	weiß	2	0	0	1	0
6	rot	rot	schwarz	2	0	0	0	1
7	rot	rot	blau	2	0	0	0	0
8	rot	gelb	gelb	1	2	0	0	0
9	rot	gelb	grün	1	1	1	0	0
10	rot	gelb	weiß	1	1	0	1	0
11	rot	gelb	schwarz	1	1	0	0	1
12	rot	gelb	blau	1	1	0	0	0
13	rot	grün	grün	1	0	2	0	0

Zelle	Formel
D2:H13	=ZÄHLENWENN($A2:$C2;D)

Oder mit x, beachte dann aber die doppelten Zeilen:
.mcs{margin-top:5pt;}.mcs table{border-collapse:collapse;}.mcs table td{border:1px solid #999999;color:#000000;background-color:#FFFFFF;font:11pt Calibri, sans-serif;padding:1pt 2pt;text-align:left;vertical-align:middle;}.mcs .foot td{border:0;font-size:9pt;color:#888888;padding:0;}.mcs .foot{clear: both;}.mcs .foot td{background-color:transparent;}.mcs .sheet td:first-child{background-color:#ddddee;text-align:center;}.mcs .sheet thead td{background-color:#ddddee;text-align:center;}.mcs .sheet tr:first-child td{background-color:#ddddee;text-align:center;}.mcs .bcFFFF00{background-color:#FFFF00;}.mcs .r{text-align:right;}.mcs .formulas tr:first-child td{background-color:#eeaaaa;}.mcs .cond tr:first-child td{background-color:#aaaaee;}.formats, .names, .formulas, .cond, .fonts, .valid{float: none;margin: 10pt 10pt 0 0;}

Arbeitsblatt mit dem Namen 'Tabelle1'
	A	B	C	D	E	F	G	H
1				rot	gelb	grün	weiß	schwarz
2	rot	rot	rot	x
3	rot	rot	gelb	x	x
4	rot	rot	grün	x		x
5	rot	rot	weiß	x			x
6	rot	rot	schwarz	x				x
7	rot	rot	blau	x
8	rot	gelb	gelb	x	x
9	rot	gelb	grün	x	x	x
10	rot	gelb	weiß	x	x		x

Zelle	Formel
D2:H10	=WENN(ZÄHLENWENN($A2:$C2;D)>0;"x";"")

 

Die 2. Version würde ich nicht verwenden, McSanta.

Die erste dann mit benDefFmt "x";;. Vorteil: Man kann die dahinterstehenden Anzahlen weiterhin rechnerisch auswerten. Außerdem verwendet man immer eher Zahlen anstelle von Strings, so lange es die Anwendung irgendwie zulässt.

 

Danke schon mal für eure Beiträge. Ich sehe da im Moment für mich immer noch keine Lösungsmöglichkeit, da ich nicht weiß, wie es jetzt genau umsetzen soll....

Könntet ihr mir da bitte nochmal ein Beispiel nennen...

 

Leider verstehe ich nicht, welche Frage du nach meinem Vorschlag #9 noch konkret hast.
Dort hatte ich beschrieben, dass ich zuerst den Code von EarlFred benutze und diese Ausgabe dann mit einer Formel bearbeite, damit ich die x bekomme, wie du sie in #7 wolltest.

Kannst du noch einmal vollständig ein Beispiel zeigen, bei dem du den Input zeigst und welches genaue Ergebnis du erwartest?