Bonjour je cherche à coder les conditions suivante sous forme de fonctions.
=SI(B6=7,16%;(J6+M6)*8%;

SI(B6=7,4%;(J6+M6)*20%;

SI(B6=7,7%;(J6+M6)*35%;

SI(B6=8%;(J6+M6)*50%;

SI(B6=8,5%;(J6+M6)*75%;

SI(B6=8,52%;(J6+M6)*76%

SI(OU(B6=4,4%;B6=4,5%;B6=9%;B6=9,06%;B6=9,12%;B6=9,5%;B6=10,2%;B6=15,27%);(J6+M6)

SI (OU(J6=0 ;M6=0)=>0 sinon => ((J6+M6)-AE6)


j'ai essayé la fonction suivantes mais elle ne marche pas
code:

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
20
21
22
23
24
25
26
Function Fonction(CelPourcent As Range, Cel1 As Range, Cel2 As Range, cel3 As Range)
Dim p As Single
 
Select Case CelPourcent
Case 0.0716: p = 0.08
Case 0.074: p = 0.2
Case 0.077: p = 0.35
Case 0.08: p = 0.5
Case 0.085: p = 0.75
Case 0.0852: p = 0.76
MaFonction2 = (Cel1 + Cel2) * p
 
Case Else
Case 0.135,case 0.044, case 0.045, case 0.0906,case 0.102,case 0.1527
MaFonction2 = (Cel1 + Cel2)
 
Case Else
Cel1=0,cel2=0
Case Else
MaFonction2 = (Cel1 + Cel2) - cel3
 
 
End Select
 
 
End Function
quelqu'un aurait il une idée ?