Bonjour tout le monde,

je souhaite écrire dans une case excel
Code : Sélectionner tout - Visualiser dans une fenêtre à part
=IF(D13=1;0;MIN(E13;TRUNC(F13/($B$7*$B$6))))
comme mon excel est en anglais je code en VB
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Cells(i, 7).Formula = "=IF(D" & i & "=1,0,MIN(E" & i & ",TRUNC(F" & i & "(/($B$7*$B$6)))))"
avec des virgules au lieu des points virgules

cette ligne bug... et je n'arrive pas à comprendre pourquoi

de plus dans le meme code, les lignes
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Cells(i, 6).Formula = "=ROUND(C" & i & "+10*B4*C" & i & "/B2*MAX(0,B7-B3)*B6,2)"
et
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Cells(i, 8).Formula = "=IF(D" & i & "=1,F" & i & ",F" & i & "-G" & i & "*$B$7*$B$6)"
fonctionnent à merveille...

Merci de votre aide