Problème de valeur fichier combinaison

Bonsoir,

je me présente Guy, j'ai 47 ans et vie dans le sud de la France. Je suis débutant sur Excel.

J'ai récupéré cette fiche excel sur le forum et je voudrais la modifier pour mes besoins.

Soit faire les combinaisons sur 5 chiffres avec les chiffres de 0 a 9, mais je ne parviens pas à rajouter les deux colonnes manquantes V4 et V5 ça me met une erreur que je ne comprends absolument pas

Merci de votre aide , si joint le fichier excel !

PS: Il faut absolument toutes les combinaisons possibles.

Guy

25combinaisons1.zip (53.28 Ko)

bonjour,

pour avoir toutes les combinaisons de 5 chiffres parmi les chiffres de 0 à 9 tu mets 0 en A1, tu mets=A1+1 en A2 et tu tires vers bas jusqu'à la ligne 100.000 et tu utilises le format "00000"

Bonjour,

Il faut d'abord avec cette formule, sélectionner la plage D7:H258, puis ajuster correctement la formule :

=TbCombinaisons($A$1:$J$1;D4)

et valider matriciellement.

Cordialement.

je crois que j'ai confondu combinaison et arrangement.

Merci pour vos réponses,

MFerrand, je ne parviens pas à modifier les données dans les colonnes ça me le refuse, je ne parviens même pas à les sélectionner

J'ai besoin d'aide

Merci

bonjour,

voici le fichier avec la formule adaptée

21combinaisons1.zip (45.37 Ko)

Bonsoir h2so4,

merci pour ce super boulot mais il me faudrait les combinaisons dans tous les ordres possibles. As-tu une idée la dessus?

Toute aide est bienvenue j'avoue je pédale un peu, merci !

bonsoir,

solution via une macro

Dim v(9), a(5), c
Sub aargh()
    combi
End Sub
Sub combi(Optional n = 1)
    For i = 0 To 9
        If v(i) = 0 Then
            v(i) = 1
            a(n) = i
            If n = 5 Then
                c = c + 1
                For j = 1 To 5
                    Cells(c, j) = a(j)
                Next j
            Else
                combi n + 1
            End If
            v(i) = 0
        End If
    Next i
End Sub
13krank.xlsm (621.86 Ko)

Bonjour,

Salut h2so4 !

Hier pause électorale !

mais il me faudrait les combinaisons dans tous les ordres possibles.

Qu'entends-tu par là ?

Ce n'est plus les combinaisons ! on revient aux arrangements ?

bonjour

en fait sa devrais commencé par 00000 et finir par 99999

00001

00002

00003

etc etc

99991

99992

99993

etc etc jusqu’à 99999

bonjour,

voici une macro si tu ne veux pas la formule que je t'ai proposée avant

Dim a(5), c
Sub aargh()
    combi
End Sub
Sub combi(Optional n = 1)
    For i = 0 To 9
            a(n) = i
            If n = 5 Then
                c = c + 1
                For j = 1 To 5
                    Cells(c, j) = a(j)
                Next j
            Else
                combi n + 1
            End If
    Next i
End Sub

ou une autre façon de faire

Sub aargh()
    For i = 0 To 99999
        s = Format(i, "00000")
        For j = 1 To 5
            Cells(i + 1, j) = Mid(s, j, 1)
        Next j
    Next i
End Sub

Il faut lister tes numéros de 0 à 9 au lieu de le faire de 1 à 0 !

Bonsoir à tous et merci beaucoup h2so4,

ton fichier est magique pour moi ça m'évite un travail fastidieux à la main.

Merci à MFerrand aussi.

Vous êtes vraiment très sympathiques sur ce forum.

Guy

Rechercher des sujets similaires à "probleme valeur fichier combinaison"