Loto Foot 15 : prendre en compte les multiples dans le résultat

anthoYS

XLDnaute Barbatruc
Bonjour,


Dans mon fichier, plusieurs onglets, 1 avec le résultat existant, le second qui dit ce qui est souhaité, un troisième avec le tableau des mises en fonction des doubles et/ou triples cochés.

On retrouve des doubles en C2, C3 et C7. Le but est d'améliorer les codes existants afin qu'il prenne en compte les multiples.

Code:
Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo erreurStop
  If Target.Row > 33 Then Exit Sub
  If Target.Column > 35 Then Exit Sub
  Select Case Target.Value
   Case Is = 1
        Target.HorizontalAlignment = xlLeft
   Case Is = "N"
       Target.HorizontalAlignment = xlCenter
   Case Is = 2
        Target.HorizontalAlignment = xlRight
  End Select
erreurStop:
End Sub
_____________________________________________________
Sub MàJ()
    On Error GoTo erreurStop
    For Lig = 2 To 33
        For Col = 3 To 35
            Select Case Cells(Lig, Col).Value
            Case Is = 1
                With Cells(Lig, Col)
                    .HorizontalAlignment = xlLeft
                    .Interior.ColorIndex = 4
                End With
            Case Is = "N"
                With Cells(Lig, Col)
                    .HorizontalAlignment = xlCenter
                    .Interior.ColorIndex = 6
                End With
            Case Is = 2
                With Cells(Lig, Col)
                    .HorizontalAlignment = xlRight
                    .Interior.ColorIndex = 3
                End With
            End Select

voir fichier ce sera plus simple
en un second temps, améliorer les MEFC pour qu'elles soient valides en cas de double et/ou de triples.
pas évident mais je pense faisable.

les pronostics ainsi que les résultats sont simulés, il s'agit de hasard total (bien que ça puisse tomber !).


Merci par avance
à+ ;)
 

Pièces jointes

  • LotoFoot.xlsm
    29.5 KB · Affichages: 57
  • LotoFoot.xlsm
    29.5 KB · Affichages: 67
  • LotoFoot.xlsm
    29.5 KB · Affichages: 77

NezQuiCoule

XLDnaute Occasionnel
Re : LOTO FOOT : prendre en compte les multiples dans le résultat

Bonsoir Anthony,

J'ai planché un peu sur ta requête, et tu trouveras ci-joint un fichier que j'ai entièrement élaboré.

Au début je suis reparti de ta grille avec les matchs que tu as mis, puis j'ai choisi de coder l'analyse des matchs/résultats en VBA.
Vois si ce fichier correspond à tes attentes :)

A+
 

Pièces jointes

  • Loto_Foot_15-NQC.xlsm
    24.7 KB · Affichages: 51

anthoYS

XLDnaute Barbatruc
Re : LOTO FOOT : prendre en compte les multiples dans le résultat

Bonsoir, :D



c'est pas mal du tout. Par contre, j'aimerais que :
  • les cases cochés soient rendu possible par un double clic et qu'on l'efface avec un autre double clic. Ainsi que les résultats ;
  • que le nombre de doubles et de triples soient affichés une ligne avant le prix de la grille ainsi que le total à payer en décalant l'onglet "analyse" ;
Sinon, c'est excellent ça.

Aussi pour l'onglet "analyse", on devrait faire un autre bouton de commande, "calcul du coût de la (des) grille(s)".
Puis, "Analyse du résultat".



Merci encore pour ce beau travail. :)
à+ :D
 
Dernière édition:

NezQuiCoule

XLDnaute Occasionnel
Re : Loto Foot 15 : prendre en compte les multiples dans le résultat

Bonjour Anthony,

Voilà, fichier mis à jour suivant tes recommandations, avec pas mal d'améliorations esthétiques et fonctionnelles ;)

Bonne journée !
 

Pièces jointes

  • Loto_Foot_15-NQC_v2.xlsm
    29.5 KB · Affichages: 112

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 196
Messages
2 086 101
Membres
103 116
dernier inscrit
kutobi87