Excel-Formel um Zahlen zu kombinieren

[mucki082]

Hallo,

vielleicht hat jemand hier einen Tip für mich wie ich mit Excel folgendes Problem lösen kann:

Ich habe 8 Zahlen 1,2,3,4,5,6,7,8 und jetzt sollen daraus immer sechs Zahlen (Lotto) kombiniert werden - so dass alle Kombinationen dargestellt werden.

Nach Adam Riese müßte das 28 Kombinationen ergeben - nur wie stelle ich die 28 Kombi's mit Excel dar?

Danke.
Gruß
mucki

 

[Imperator]

Hallo mucki082 -

hoffe, das meine PN etwas zur Lösung beitragen konnte.


Gruss

Wolf_57

Vielleicht hilft es Ihm ja, aber niemand anderem!
Wie wäre es wenn Lösungsvorschläge für alle sichtbar und nachvollziehbar gepostet werden?
Ansonsten sehe ich nämlich in deinem von dir erstellten Post keinen Sinn, ausser SPAM! Das er eine PN von Dir bekommen hat sieht er schon selbst!

mfg
Imperator

 

[mucki082]

Hallo Wolf_57,

deine Tabelle hat mein Problem gänzlich gelöst.
Herzlichen Dank
Gruß
mucki

 

[FeliX_22]

Hallo!

Damit jeder was davon hat, poste ich hier meine Lösung:

In den Zellen A1 bis H1 stehen die 8 unterschiedlichen Zahlen. In den Zellen A3 bis F30 stehen die "Formeln".

[B][COLOR="Blue"]A	B	C	D	E	F	G	H[/COLOR][/B]
14	6	49	22	7	18	31	27

=A1	=B1	=C1	=D1	=E1	=F1
=A1	=B1	=C1	=D1	=E1	=G1
=A1	=B1	=C1	=D1	=E1	=H1
=A1	=B1	=C1	=D1	=F1	=G1
=A1	=B1	=C1	=D1	=F1	=H1
=A1	=B1	=C1	=D1	=G1	=H1
=A1	=B1	=C1	=E1	=F1	=G1
=A1	=B1	=C1	=E1	=F1	=H1
=A1	=B1	=C1	=E1	=G1	=H1
=A1	=B1	=C1	=F1	=G1	=H1
=A1	=B1	=D1	=E1	=F1	=G1
=A1	=B1	=D1	=E1	=F1	=H1
=A1	=B1	=D1	=E1	=G1	=H1
=A1	=B1	=D1	=F1	=G1	=H1
=A1	=B1	=E1	=F1	=G1	=H1
=A1	=C1	=D1	=E1	=F1	=G1
=A1	=C1	=D1	=E1	=F1	=H1
=A1	=C1	=D1	=E1	=G1	=H1
=A1	=C1	=D1	=F1	=G1	=H1
=A1	=C1	=E1	=F1	=G1	=H1
=A1	=D1	=E1	=F1	=G1	=H1
=B1	=C1	=D1	=E1	=F1	=G1
=B1	=C1	=D1	=E1	=F1	=H1
=B1	=C1	=D1	=E1	=G1	=H1
=B1	=C1	=D1	=F1	=G1	=H1
=B1	=C1	=E1	=F1	=G1	=H1
=B1	=D1	=E1	=F1	=G1	=H1
=C1	=D1	=E1	=F1	=G1	=H1

Jetzt hast du in jeder Zelle eine einzelne Zahl. Wenn du aber das Ergebnis pro Kombination in einer Zelle haben möchtest, dann schreib einfach z.B in H3:

=A3 & " " & B3 & " " & C3 & " " & D3 & " " & E3 & " " & F3

und kopiers eben bis H30 runter.

Gruß

FeliX_22

 

[Tattooed1980]

Und hier das ganze als VBA-Lösung

Sub Reihe()
Zeile = 2
For a = 1 To 8
    WertA = Cells(1, a).Value
    For b = a + 1 To 8
    WertB = Cells(1, b).Value
        For c = b + 1 To 8
        WertC = Cells(1, c).Value
            For d = c + 1 To 8
            WertD = Cells(1, d).Value
                For e = d + 1 To 8
                WertE = Cells(1, e).Value
                    For f = e + 1 To 8
                    WertF = Cells(1, f).Value
                        Cells(Zeile, 1) = WertA
                        Cells(Zeile, 2) = WertB
                        Cells(Zeile, 3) = WertC
                        Cells(Zeile, 4) = WertD
                        Cells(Zeile, 5) = WertE
                        Cells(Zeile, 6) = WertF
                        Zeile = Zeile + 1
                    Next f
                Next e
            Next d
        Next c
    Next b
Next a
End Sub

In Feld "A1" bis "H1" müssen die Werte stehen

MfG Tattooed1980

 

[Wolf_57]

Bei der gewünschten Excelliste von Mucki082 handelt es sich um die Darstellung des Lotto-Vollsystems 008.

Gruss

Wolf_57

--------------------

@Imperator: Mein Fehler - Sorry!

@Felix22 + Tattooed1980: Danke das ihr meinen Fehler gerade gezogen habt!

 

[Imperator]

Na siehst, geht doch!

- closed -

mfg
Imperator