XL 2019 formule de recherche Excel .

[Ferbank]

Bonjour; je postes ci dessous 2 fichiers dont, un fichier témoin, recherche des séries de 3 numéros qui fonctionne bien.
Un autre fichier identique " Ferbank_V4B_ STAT_4n°" une recherche approfondie des séries de 4 numéros qui foire et ne répond pas aux résultats attendus. j'ai repris l'exemple du fichier témoin et je me suis planté...
Si quelqu'un a une idée pour corriger mes erreurs ou trouver une autre solution je l'en remercie par avance...
Ferbank

 

[TooFatBoy]

oui j'ai cherche sur le net comment réorganiser les numéros des tirages par ordre croissant et par ligne, je n'ai pas trouvé de formules concluantes

Essaye d'activer le tri dans la macro.

En activant le tri dans les macros, il y a quand même une petite erreur, aussi bien pour les triplets que pour les quadruplets (une date doublée).

Il faudra voir avec l'auteur de la macro pour obtenir une correction, ou au moins une explication.

 

[Backhandshot]

Bonjour à tous !
@TooFatBoy , je ne comprends pas lorsque vous dites date doublée pour triplet et quadruplet ?
C'est normal qu'il y ait des dates doublées avec 5 chiffres vous avez 10 triplets donc 1 date qui apparaitra 10 fois avec 10 triplets différents...même chose avec quadruplets pour 5 quadruplets différents.
La macro QSort sert juste à placer les numéros du tirage en ordre croissant de gauche à droite je ne vois pas où sont les erreurs que vous mentionnez.

 

[TooFatBoy]

Les erreurs ne sont pas dans les données mais dans les résultats. As-tu vérifié lesdits résultats ?


Possible que je me sois trompé.
Il faut que je vérifie. 😉
[edit] J'ai vérifié, et il semble bien qu'il y ait un problème. [/edit]

 

[Ferbank]

Bonjour à tous !
Ferbank, pourquoi chercher sur le net quand vous avez la solution dans le fichier ???

'---- Tri des lignes du tableau
    ReDim Vtmp(1 To DerCol - 1)    'Tableau tempo
    ' Boucle sur chaque ligne du tirage pour remplir V pour le tri
    For i = 1 To DerLig
        ' Boucle sur les colonnes du tirage
        For j = 2 To DerCol
            Vtmp(j - 1) = Vals(i, j)
        Next j
        ' Tri de V
        Qsort Vtmp, 1, DerCol - 1
        ' On remplace les valeurs non triées par les valeurs triées
        For j = 2 To DerCol
            Vals(i, j) = Vtmp(j - 1)
        Next j
    Next i
    ' Écriture du tableau trié sur la feuille
    xrg.Value = Vals

Bonne journée !

Merci pour cette aide j'ai vue que cette macro était déjà présente dans le fichier, alors je l'ai coupé et recollée celle ci à son emplacement, sauvegardée et toujours planté ca bugue!
Fallait il surement procéder autrement je pense ?
J'aimerai temps comprendre VB

 

[TooFatBoy]

Y a pas à couper ou coller quoi que ce soit, y a juste à supprimer les apostrophes en début de lignes pour que les instructions ne soient plus en commentaire.

 

[Ferbank]

Merci pour cette aide j'ai vue que cette macro était déjà présente dans le fichier, alors je l'ai coupé et recollée celle ci à son emplacement, sauvegardée et toujours planté ca bugue!
Fallait il surement procéder autrement je pense ?
J'aimerai temps comprendre VB

C'est dommage que je ne puisse pas les réorganiser pour faire fonctionner le fichier.
C'est un puits d'information j'ai fait des stats par le tri avec le fich loto sur les tirages de janvier et on s'aperçoit que tous les tirages on déjà 5 ou 4 ou 3 sortis triplets en seulement 1 mois .

 

[Ferbank]

Y a pas à couper ou coller quoi que ce soit, y a juste à supprimer les apostrophes en début de lignes pour que les instructions ne soient plus en commentaire.

je viens de le faire également mais y a toujours ce prob !

EURO_STATS_du_JOUR_3_4_n°_Fevrier23_V3.xlsm

1 file sent via WeTransfer, the simplest way to send your files around the world

we.tl

 

[TooFatBoy]

je viens de le faire également mais y a toujours ce prob !

Essaye d'activer aussi le tri dans la macro des triplets...

 

[Ferbank]

Bonjour à tous !
Ferbank, pourquoi chercher sur le net quand vous avez la solution dans le fichier ???

'---- Tri des lignes du tableau
    ReDim Vtmp(1 To DerCol - 1)    'Tableau tempo
    ' Boucle sur chaque ligne du tirage pour remplir V pour le tri
    For i = 1 To DerLig
        ' Boucle sur les colonnes du tirage
        For j = 2 To DerCol
            Vtmp(j - 1) = Vals(i, j)
        Next j
        ' Tri de V
        Qsort Vtmp, 1, DerCol - 1
        ' On remplace les valeurs non triées par les valeurs triées
        For j = 2 To DerCol
            Vals(i, j) = Vtmp(j - 1)
        Next j
    Next i
    ' Écriture du tableau trié sur la feuille
    xrg.Value = Vals

Bonne journée !

oui j'ai bien activé la macro mais il y a toujours un prob dans les résultats.
voir le fichi avec ses erreurs.

EURO_STATS_du_JOUR_3_4_n°_Fevrier23_V3.xlsm

1 file sent via WeTransfer, the simplest way to send your files around the world

we.tl

 

[TooFatBoy]

oui j'ai bien activé la macro mais il y a toujours un prob dans les résultats.

NON !

 

[Ferbank]

NON !

Regardé ci dessus par le lien vous verrez peut être où se situe l'erreur peut être
Merci quand même

 

[TooFatBoy]

Regardé ci dessus par le lien vous verrez peut être où se situe l'erreur peut être

Je te l'ai dit : active la partie tri dans la macro des triplets !!!

 

[Backhandshot]

Bonjour à tous!
@Ferbank , @TooFatBoy
Lorsque vous aurez trouvé une erreur sur les résultats vous me direz quelle combine fait défaut
Mais je serais surpris...à moins que nous n'ayons pas la même liste des tirages
Bonne journée!

 

[TooFatBoy]

Lorsque vous aurez trouvé une erreur sur les résultats vous me direz quelle combine fait défaut

Comme je demandais en #93, as-tu vérifié les résultats ?
Si oui, n'as-tu pas vu une date en double ?

 

[Backhandshot]

Re,
@TooFatBoy avez-vous lu mon post #92 ? Est-ce que vous comprenez ce que j'explique dans le post ?
OUI... il y a des dates en double dans toute la liste des résultats mais PAS sur 1 COMBINE UNIQUE
Supposons la combine 1,2,3 il n'y apparaitra pas le 2 janvier 2017 (2 fois) pour la combinaison mais peut apparaitre le 2 janvier 2017 également pour la combinaison 1,2,47 c'est un exemple ne vérifier pas ces combinaisons je les ai pris au hasard. Donc si vous trouvez une combinaison UNIQUE avec la MÊME DATE 2 fois là vous pourrez dire qu'il y a erreur mais d'ici là ...je ne vois pas d'erreur