messagebox et calcul

[heparti]

Bonsoir,

Je souhaite créer une messagebox dans laquelle serait saisie un montant. La macro basique est la suivante :

sub essai_inputbox ()
age = application.inputbox("Quel montant ?", type:=1)
range("A1").value = montant
end sub

Par la suite, je souhaite que le montant saisi soit soustrait du montant égal au solde précédemment calculé et apparaisse dans une autre cellule de la feuille.

Par exemple :
montant initial : 1000
première messagebox : 40 le solde devient alors 9960
deuxième messagebox quelques jours après : 111 : le calcul est alors : 9960-111=9849 qui apparait alors dans l'autre cellule.

Ainsi de suite lors de chaque saisie.

Merci pour votre aide

 

[phlaurent55]

Re : messagebox et calcul

Bonjour heparti,

voir fichier joint

à+
Philippe

 

[heparti]

Re : messagebox et calcul

merci, ça correspond tout à fait à ma demande.

Bonne soirée et bon week-end.