Open office calc combinaisons
dfdfdfdf
-
yg_be Messages postés 23541 Date d'inscription Statut Contributeur Dernière intervention -
yg_be Messages postés 23541 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
j'aimerai generer toutes les combinaisons de 5 chiffres parmis 50 sur excel pourriez vous m'aider
je ne m'y connais pas du tout et je ne sais pas faire de macro ni l'executer
merci
j'aimerai generer toutes les combinaisons de 5 chiffres parmis 50 sur excel pourriez vous m'aider
je ne m'y connais pas du tout et je ne sais pas faire de macro ni l'executer
merci
A voir également:
- Open office calc combinaisons
- Open office gratuit - Télécharger - Suite bureautique
- Microsoft office - Guide
- Cette technique secrète permet d'avoir Windows et Microsoft Office gratuitement et à vie - Accueil - Bureautique
- Web office - Guide
- Save as pdf office 2007 - Télécharger - Bureautique
6 réponses
Bonjour
Voilà
https://mon-partage.fr/f/UzoSeFy1/
Évidemment plus la liste de nombres en col A est longue plus la macro met du temps à se réaliser
Cdlmnt
Via
Voilà
https://mon-partage.fr/f/UzoSeFy1/
Évidemment plus la liste de nombres en col A est longue plus la macro met du temps à se réaliser
Cdlmnt
Via
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
bonjour, quel genre de résultat attends-tu?
exemple:
Private Sub kombi()
Dim f As Worksheet, nlig As Long, i1 As Integer, i2 As Integer, i3 As Integer, i4 As Integer, i5 As Integer
Set f = ThisWorkbook.Sheets("combi")
nlig = 1
For i1 = 1 To 50
For i2 = 50 To i1 + 1 Step -1
For i3 = i2 + 1 To 50
For i4 = 50 To i3 + 1 Step -1
For i5 = i4 + 1 To 50
f.Cells(nlig, 1) = i1
f.Cells(nlig, 2) = i2
f.Cells(nlig, 3) = i3
f.Cells(nlig, 4) = i4
f.Cells(nlig, 5) = i5
nlig = nlig + 1
Next i5
Next i4
Next i3
Next i2
Next i1
End Sub
Bonjour
Voilà :
https://mon-partage.fr/f/3RHZ5m9V/
Les résultats sont sur 3 colonnes vu le nombre qui dépasse le nombre de cellules en hauteur d'Excel
Cdlmnt
Via
Voilà :
https://mon-partage.fr/f/3RHZ5m9V/
Les résultats sont sur 3 colonnes vu le nombre qui dépasse le nombre de cellules en hauteur d'Excel
Cdlmnt
Via
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Re
Remplace la macro par celle-ci
Depuis une autre feuille lance la macro depuis le ruban Developpeur - Macros - combi - Exécuter
et patiente : la macro met plusieurs minutes à s'exécuter vu le nombre d'écritures à faire
Remplace la macro par celle-ci
Sub combi() y = 1 For a = 1 To 46 For b = a + 1 To 47 For c = b + 1 To 48 For d = c + 1 To 49 For e = d + 1 To 50 x = x + 1 If x > 1000000 Then x = 1: y = y + 7 Cells(x, y) = a Cells(x, y + 1) = b Cells(x, y + 2) = c Cells(x, y + 3) = d Cells(x, y + 4) = e Next Next Next Next Next End Sub
Depuis une autre feuille lance la macro depuis le ruban Developpeur - Macros - combi - Exécuter
et patiente : la macro met plusieurs minutes à s'exécuter vu le nombre d'écritures à faire
Bonjour pourriez vous m'aider à présent à réaliser un programme pratiquement similaire mais avec des contraintes:
1) Je veux donner une liste de nombre
2) faire une combinaison de 5 chiffres à partir de ceux que j'aurais lister
-Pas de répétition du même chiffre dans une combinaison
en générerant uniquement des combinaisons dont la somme des 5 chiffres soit comprise entre 130 et 160
Et que ces combinaisons aient un écart entre chaque chiffre que j'aurais déterminer par exemple on a donc une combinaison a b c d e je veux que a+b+c+d+e = [130;160] et que b-a =[5;10] , c-a=[12-14], d-a..,e-a.., ect
merci par avance pour le temps que vous pourrez y accorder et j'imagine que ce sera plutot long
Cordialement
1) Je veux donner une liste de nombre
2) faire une combinaison de 5 chiffres à partir de ceux que j'aurais lister
-Pas de répétition du même chiffre dans une combinaison
en générerant uniquement des combinaisons dont la somme des 5 chiffres soit comprise entre 130 et 160
Et que ces combinaisons aient un écart entre chaque chiffre que j'aurais déterminer par exemple on a donc une combinaison a b c d e je veux que a+b+c+d+e = [130;160] et que b-a =[5;10] , c-a=[12-14], d-a..,e-a.., ect
merci par avance pour le temps que vous pourrez y accorder et j'imagine que ce sera plutot long
Cordialement
Bonjour
Oui la macro fonctionne mais selon les nombres et les conditions de mini et de maxi rentrés il peut n'y avoir aucune solution
Donc que veux tu dire par je ne parviens pas à executer la macro, : tu n'arrives pas à la lancer ou rien ne sort ?
Il est normal que les solutions soient ordonnées selon les nombres de la liste puisque la macro les lit dans l'ordre pour qu'aucun ne soit oublié, qu'un même nombre ne soit pas pris en compte 2 fois dans la même solution et que toutes les combinaisons soient envisagées, donc je ne vois pas pourquoi seule ne partie des solutions seraient retournée
Oui la macro fonctionne mais selon les nombres et les conditions de mini et de maxi rentrés il peut n'y avoir aucune solution
Donc que veux tu dire par je ne parviens pas à executer la macro, : tu n'arrives pas à la lancer ou rien ne sort ?
Il est normal que les solutions soient ordonnées selon les nombres de la liste puisque la macro les lit dans l'ordre pour qu'aucun ne soit oublié, qu'un même nombre ne soit pas pris en compte 2 fois dans la même solution et que toutes les combinaisons soient envisagées, donc je ne vois pas pourquoi seule ne partie des solutions seraient retournée
et waw beau programme