EXCEL Kombinationen ?!

hi alle miteinander

ich brauche bitte eure hilfe, ich bin am verzweifeln :S

folgende aufgabe:

ich habe die zahlen 0 - 9

ich muss jetzt ein algorithmus mit excel erstellen oder ein makro damit ich alle möglichen zahlenkombinationen aufgelistet bekomme

diese zahlen müssen aber 40 stellig sein

und ich habe keeeeine ahnung wie ich das machen soll… :frowning:

bitte helft mir

danke im voraus

Bitte korrigiert mich…aber sind das nicht insgesamt 10^40 verschiedene Kombinationen? Das ist 10000000000000000000000000000000000000000 :smiley:

Sicher das du die Aufgabenstellung richtig verstanden hast?

Hallo.
Ich habe die Anfrage erhalten, kann aber leider nicht weiterhelfen.
Viel Glück.
Ebbi.

GENAU 10^40
stimmt schon so

ich bin mir sicher das ich sie richtig verstanden habe :smile:

Also ohne jetzt groß programmiertechnisch zu denken…warum fängst du nicht bei

9999999999.9999999999.9999999999.9999999999

an und ziehst immer 1 ab?
Oder ist das zu einfach?

GENAU 10^40
stimmt schon so

ich bin mir sicher das ich sie richtig verstanden habe :smile:

das habe ich meinem prof. vorgeschlafen aber er will n visual basic algorithmus sehen.

ich verstehe das nicht :frowning:

Es ist unnötige verschwendung an Zeit und Energie!
Es sind 10^40 Kombinationen. Bis 10^15 kann Variant-Datentyp hinhalten, bei größeren Werten hat er aber nicht genug Genauigkeit.
Wenn die Daten nur so ‚just vor fun‘ generiert werden sollen, muss es mit unterlageten Schleifen und im stringformat geschehen.
z.B.:

For i = 0 To 99
 For j = 0 To 99
 Debug.Print IIf(i \> 0, i, "") & j
 Next j
Next i

Bereiche können erhöht werden, ohne ‚DoEvents‘ in der innersten Schleife, würde ich das ‚Diing‘ aber nicht starten

Hä ?
das verstehe ich nicht so ganz.
40-stellige Zahlen bestehend aus allen Ziffern 0 - 9?
Das hiesse ja von
1.000.000.000.000.000.000.000.000.000.000.000.000.000
bis
9.999.999.999.999.999.999.999.999.999.999.999.999.999
alle Werte. Ist das so gemeint?
Kann ich mir kaum vorstellen - das wäre ja total simpel.
Bitte beschreib Dein Problem mal ein wenig präziser.
Dann kann man Dir vielleicht auch helfen.
Danke und Gruß,
Jochen

Option Base 1
Sub kombinationen_mit_x_stellen()
Dim ziffern() As String, index As Integer, ziffer As Integer

Const stellen = 4 'zum testen, im ernstfall hier 40 eintragen
ReDim ziffern(stellen)
For index = 1 To stellen
ziffern(index) = „0“
Next index

On Error GoTo ende
Do
Debug.Print Join(ziffern, „“)
For index = stellen To 0 Step -1
ziffer = 1 + ziffern(index)
ziffern(index) = Right(ziffer, 1)
If ziffer

Hallo McGill,

da muss ich passen.

Sorry

genau 40 stwllige Zahlen bestehen aus allen Ziffern von 0-9
Also von 1.000.000.000.000.000.000.000.000.000.000.000.000.000

bis
9.999.999.999.999.999.999.999.999.999.999.999.999.999 alle Kombinationen, richtig!

Danke nochmal!