OVH Cloud OVH Cloud

Vérifier le tirage du loto avec les combinaisons jouées

5 réponses
Avatar
Soya
Bonjour à tous,
Je voudrais une formule qui me dira combien j'ai de bons numéros au loto...
Ex : en A1, je rentre la combinaison que j'ai jouée.
En A2 je rentre la combinaison du tirage.
En A3, je voudrais la formule qui me dira : tu as tant de bon numéros.

Merci infiniment !

Soya

5 réponses

Avatar
Daniel
Bonjour.
Essaie la fonction (en supposant tes numéros séparés par des espaces) :

Function NbrNumeros(c As Range)
Dim Joué, Résultat, Ctr As Integer
Joué = Split(c.Value)
Résultat = Split(c.Offset(, 1))
For Each i In Joué
For Each j In Résultat
If i = j Then Ctr = Ctr + 1
Next j
Next i
NbrNumeros = Ctr
End Function

Cordialement.
Daniel
"Soya" a écrit dans le message de news:

Bonjour à tous,
Je voudrais une formule qui me dira combien j'ai de bons numéros au
loto...
Ex : en A1, je rentre la combinaison que j'ai jouée.
En A2 je rentre la combinaison du tirage.
En A3, je voudrais la formule qui me dira : tu as tant de bon numéros.

Merci infiniment !

Soya


Avatar
Soya
Merci beaucoup Daniel. J'ai cependant oublié de préciser que mes 6 numéros
sont entrés en A1, B1, C1 etc. jusqu'à F
Même chose pour le tirage qui est entré de A à F, mais sur la ligne 2.
Pouvez-vous m'aider ?


Bonjour.
Essaie la fonction (en supposant tes numéros séparés par des espaces) :

Function NbrNumeros(c As Range)
Dim Joué, Résultat, Ctr As Integer
Joué = Split(c.Value)
Résultat = Split(c.Offset(, 1))
For Each i In Joué
For Each j In Résultat
If i = j Then Ctr = Ctr + 1
Next j
Next i
NbrNumeros = Ctr
End Function

Cordialement.
Daniel
"Soya" a écrit dans le message de news:

Bonjour à tous,
Je voudrais une formule qui me dira combien j'ai de bons numéros au
loto...
Ex : en A1, je rentre la combinaison que j'ai jouée.
En A2 je rentre la combinaison du tirage.
En A3, je voudrais la formule qui me dira : tu as tant de bon numéros.

Merci infiniment !

Soya







Avatar
Daniel
Alors, formule matricielle (valideer avec CTRL+MAJ+Entrée) :
=SOMME(N(A1:F1¢:F2))
Daniel
"Soya" a écrit dans le message de news:

Merci beaucoup Daniel. J'ai cependant oublié de préciser que mes 6 numéros
sont entrés en A1, B1, C1 etc. jusqu'à F
Même chose pour le tirage qui est entré de A à F, mais sur la ligne 2.
Pouvez-vous m'aider ?


Bonjour.
Essaie la fonction (en supposant tes numéros séparés par des espaces) :

Function NbrNumeros(c As Range)
Dim Joué, Résultat, Ctr As Integer
Joué = Split(c.Value)
Résultat = Split(c.Offset(, 1))
For Each i In Joué
For Each j In Résultat
If i = j Then Ctr = Ctr + 1
Next j
Next i
NbrNumeros = Ctr
End Function

Cordialement.
Daniel
"Soya" a écrit dans le message de news:

Bonjour à tous,
Je voudrais une formule qui me dira combien j'ai de bons numéros au
loto...
Ex : en A1, je rentre la combinaison que j'ai jouée.
En A2 je rentre la combinaison du tirage.
En A3, je voudrais la formule qui me dira : tu as tant de bon numéros.

Merci infiniment !

Soya









Avatar
Soya
Merci Daniel, ça fonctionne. Pouvez-vous cependant m'expliquer le rôle du N
dans cette formule ? Merci d'avance.


Alors, formule matricielle (valideer avec CTRL+MAJ+Entrée) :
=SOMME(N(A1:F1¢:F2))
Daniel
"Soya" a écrit dans le message de news:

Merci beaucoup Daniel. J'ai cependant oublié de préciser que mes 6 numéros
sont entrés en A1, B1, C1 etc. jusqu'à F
Même chose pour le tirage qui est entré de A à F, mais sur la ligne 2.
Pouvez-vous m'aider ?


Bonjour.
Essaie la fonction (en supposant tes numéros séparés par des espaces) :

Function NbrNumeros(c As Range)
Dim Joué, Résultat, Ctr As Integer
Joué = Split(c.Value)
Résultat = Split(c.Offset(, 1))
For Each i In Joué
For Each j In Résultat
If i = j Then Ctr = Ctr + 1
Next j
Next i
NbrNumeros = Ctr
End Function

Cordialement.
Daniel
"Soya" a écrit dans le message de news:

Bonjour à tous,
Je voudrais une formule qui me dira combien j'ai de bons numéros au
loto...
Ex : en A1, je rentre la combinaison que j'ai jouée.
En A2 je rentre la combinaison du tirage.
En A3, je voudrais la formule qui me dira : tu as tant de bon numéros.

Merci infiniment !

Soya














Avatar
Daniel
"A1:F1¢:F2" renvoie une matrice de valeurs "VRAI" ou "FAUX". La fonction N
transforme les "VRAI" en 1 et les "FAUX" en 0.
Daniel
"Soya" a écrit dans le message de news:

Merci Daniel, ça fonctionne. Pouvez-vous cependant m'expliquer le rôle du
N
dans cette formule ? Merci d'avance.


Alors, formule matricielle (valideer avec CTRL+MAJ+Entrée) :
=SOMME(N(A1:F1¢:F2))
Daniel
"Soya" a écrit dans le message de news:

Merci beaucoup Daniel. J'ai cependant oublié de préciser que mes 6
numéros
sont entrés en A1, B1, C1 etc. jusqu'à F
Même chose pour le tirage qui est entré de A à F, mais sur la ligne 2.
Pouvez-vous m'aider ?


Bonjour.
Essaie la fonction (en supposant tes numéros séparés par des espaces)
:

Function NbrNumeros(c As Range)
Dim Joué, Résultat, Ctr As Integer
Joué = Split(c.Value)
Résultat = Split(c.Offset(, 1))
For Each i In Joué
For Each j In Résultat
If i = j Then Ctr = Ctr + 1
Next j
Next i
NbrNumeros = Ctr
End Function

Cordialement.
Daniel
"Soya" a écrit dans le message de
news:

Bonjour à tous,
Je voudrais une formule qui me dira combien j'ai de bons numéros au
loto...
Ex : en A1, je rentre la combinaison que j'ai jouée.
En A2 je rentre la combinaison du tirage.
En A3, je voudrais la formule qui me dira : tu as tant de bon
numéros.

Merci infiniment !

Soya