formule si en vba Résolu/Fermé

Question

Bonjour *

c'est que j'ai 04 txtbox
1 (txtsommedebit) et
2 (txtsommecredit
ainsi que
3 (txtsoldedebit ) et
4 (txtsoldecredit)
la question est :
si txtsommedebit est supérieur à txtsommecrédit la différence doit etre inscrite au txtsoldedebit
et
si txtsommedebit est inférieur à txtsommecrédit la différence doit etre instcrite au txtsoldecredit

et j'ai essayé la formule suivante mais malheureusement à la pratique ç'a mal fonctionné

If   Sommedebit  >  Somme credit    Then
Soldecredit  =  Val(Sommedebit)  -  Val(Sommecredit)
Else :  soldedebit  =  0
End If
If   Sommedebit  <  Somme credit    Then
soldecredit = Val(Somme credit  )  -  Val(Sommedebit  )
Else: solde credit = 0
End If

En excel  ç’a fonctionne comme suit :
Dans la colonne   C    =SI(A1>B1 ;A1-B1 ;0)
Dans la colonne   D    =SI(B1>A1;B1-A1;0)

coordialement  et  merci d'avance

yg_be · Answer

bonjour, "ç'a mal fonctionné": message d'erreur?
exemple:
If Sommedebit > Somme credit Then 
    soldedebit = Val(Sommedebit) - Val(Sommecredit) 
    soldecredit = 0 
else
     soldecredit = Val(Somme credit ) - Val(Sommedebit ) 
     soldedebit  = 0 
End If

Formule si en vba

1 réponse

Discussions similaires