Formule sous VBA

Bonjour le forum,

Je voudrais savoir comment convertir les formules ci-dessous en VBA afin de les incorporer dans l'userform

Colonne F=SI(OU(D5="";I5= "Validée");0;SI(D5>AUJOURDHUI();0;DATEDIF(D5;$B$1;"d")))
Colonne G=SI(O5="";0;SI(F5>0;E5*$E$1*(F5/365)+40;0))
Colonne H==E5+G5
Colonne I=SI(A5="";"";SI(E5<=K5;"Validée";"En attente"))
Colonne L=SIERREUR(SI(I5="Validée";K5-E5;"");"")
Colonne M=SI(I5= "Validée";"";SI(A5<>"";SI(AUJOURDHUI()>D5+15;"Relance1";"");""))
Colonne N=SI(I5="Validée";"";SI(A5<>"";SI(AUJOURDHUI()>D5+45;"Relance2";"");""))
Colonne O=SI(I5="Validée";"";SI(A5<>"";SI(AUJOURDHUI()>D5+75;"Relance3";"");""))
Colonne P=SI(I5="Validée";"";SI(A5<>"";SI(D5+75<AUJOURDHUI();"R3";SI(D5+45<AUJOURDHUI();"R2";SI(D5+15<AUJOURDHUI();"R1";"")));""))
Colonne U=-SOMME(Q5:T5;-E5)

Merci, Cordialement

Laurent

Fais une recherche Google sur

AfficheFormuleAnglais

Tu trouveras en téléchargement la fonction de Jacques Boisgontier qui fait ça nickel...

A+ Cordialement, Daniel

Bonsoir,

Sinon, en VBA, tu as la possibilité d'utiliser la formule en langue locale en utilisant la propriété "FormulaLocal" comme ceci :

Sub test()
    [A1] = 10
    [B1] = 15
    Range("C1").FormulaLocal = "=SI(A1<B1;1;0)"
End Sub

merci Dan42153 , je ne connaissais pas du tout ce système.

merci Raja je vais essayé de l'incorporer à l'userform

Si je n'y arrive pas je reviendrais vers vous je vais vous mettre le fichier j'avais oublié

c'est sur ce fichier raccourci sur lequel je bosse

Cordialement

Laurent