Discussion :

[jaquot14]

Bonjour à tous,
Fichier excel
je suis à la recherche d'une formule de calcul depuis ce matin et je ne m'en sort pas et je ne sais si cela est applicable.
Je m'explique:
j'ai une cellule de référence en G1
j'ai 4 cellule ( tour1, tour2, tour3 et tour4)avec cellule correspondant B2,C2,D2 et E2.
je souhaiterais avoir en K2:
que si B2<>G1==>K2=1
que si B2=G1==> K2=2
que si C2=G1==> k2=3
que si D2=G1==>K2=4
que si E2=G1==>K2=""
Cela fonctionne pour les 2 premières formule et pas pour les autres.
Je joint un fichier d'exemple et en attendant vos réponse, je continue ma recherche.
Merci à tous

[Invité]

Bonjour,

Si le VBA vous est permis, essayez cette fonction :
J'ai renommé vos cellules B2 à E2 en Tour1 à Tour4 et Reference pour G1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Function CalculK2() As Variant
 
     Application.Volatile
 
    CalculK2 = ""
 
    With Sheets("Feuil1")
 
        If .Range("Tour4") = .Range("Reference") Then CalculK2 = "": Exit Function
        If .Range("Tour3") = .Range("Reference") Then CalculK2 = 4: Exit Function
        If .Range("Tour2") = .Range("Reference") Then CalculK2 = 3: Exit Function
        If .Range("Tour1") = .Range("Reference") Then CalculK2 = 2: Exit Function
 
        If .Range("Tour1") <> .Range("Reference") Then CalculK2 = 1
 
    End With
 
End Function

[jaquot14]

Bonsoir Eric KERGRESSE,

Je te remercie pour ta réponse très rapide.
J'ai essayé ton code et il fonctionne à merveille et je viens de l'adapter à ma base excel, c'est super, c'est exactement ce qu'i me Faller.
Encore un grand merci à vous
Bonne soirée
jaquot14