Calcul sur vba exel
Bonjour,
j'ai uin probleme :
comment permettre a vba d'effectuer un calcul directement apres la saisie des données sur mon usurforme (nomme frmreponse
voici mon calcul:
Code :
Sub textTotal_Change()
TextTotal = TextMontant(1 + TextTaux) * TextDuree
End Sub
si qquelqu'un peut m aidé sa serai vraiment gentil je desespere merci d avance
j'ai uin probleme :
comment permettre a vba d'effectuer un calcul directement apres la saisie des données sur mon usurforme (nomme frmreponse
voici mon calcul:
Code :
Sub textTotal_Change()
TextTotal = TextMontant(1 + TextTaux) * TextDuree
End Sub
si qquelqu'un peut m aidé sa serai vraiment gentil je desespere merci d avance
Configuration: Windows Vista Internet Explorer 7.0
3 réponses
-
salut,
je pense que tu veux que ton résultat s'affiche des la frappe des données dans ta textbox,
tu peux décrire ton IHM, pour m'expliquer clairement le problème. -
bonjour,
tout d'abord merci pour ton intervention
je suis vraimen.t novice (IHM?????)
oui je veux que mon resultat s'affiche sur ma textbix(nomme(textMontant).
En fait je veu que apres avoir saisie les informations (necesaire a mon calcul)sur mon userform(frmReponse) celui-ci me calcule ceci :
TextTotal = TextMontant(1 + TextTaux) * TextDuree
a partir de ces differents textBox et me l affiche dans le textbox (textMontant)
merci infiniment de ton aide -
Il te sera plus facile de créer un bouton, qui lorsque tu cliquera dessus, lancera la procédure de calcul (a savoir ton opération)
et là le résultat sera affiché.
ex:
private sub boutton calculer:
avec tes variables ici montant,total, taux et durée en réels (je pense !,?)
puis ton opération :TextTotal = TextMontant(1 + TextTaux) * TextDuree
puis pour que le résultat s'affiche
textmontant <--- total
pour le pseudo code:
variables entrée:
taux, durée, montant: nombre réels.
variables en sortie :
total, nombre réel.
début
renseigner montant, taux et durée, dans la case appropriée
les valeurs doivent être numérique.
cliquer sur" calculer" lance l'opération:
TextTotal = TextMontant(1 + TextTaux) * TextDuree
et affiche le résultat
résultat <---- total.
