Code VBA Excel 2007

yosra_miagi Messages postés 97 Date d'inscription   Statut Membre Dernière intervention   -  
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   -
salut tout le monde je suis débutante en programmation vba excel j'espère que vous pouvez m'aider .
j"ai deux zone de texte :
1 ère zone de texte: texte box 1.text (contient le taux d'amortissement par exemple 0.2)
2 éme zone de texte: texte box 2.text(elle doit contient la durée d"amortissement qui est calculer comme ça :100/(texte box 1.text*100)
dans cette exemple la formule devienne 100/20=5 le résultat s'affiche en texte box 2

je veux savoir le code à écrire dans texte box 1 ( évènement change) qui permet de calculer et d'afficher le résultat en text box 2

et merciiiiii
A voir également:

2 réponses

Réponse 1 / 2
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

Une version simple sans controle d'entree par keypress,

Calcul si chiffres et un seul point, si vous entrez autre chose affichage dans textbox2 

Private Sub TextBox1_Change()
  'formule:100/(texte box 1.text*100)
  'test >0 et pas vide et numerique(.1234567890)
  If (TextBox1.Value > 0 And _
     TextBox1 <> "" And _
     IsNumeric(TextBox1)) Then
    TextBox2 = 100 / (TextBox1.Value * 100)
  Else
    TextBox2 = TextBox1
  End If
End Sub


Bonne suite
0
yosra_miagi Messages postés 97 Date d'inscription   Statut Membre Dernière intervention  
 
merci pour votre aide
j'ai essayé cette formule mais ça ne change rien voila ma formule
Private Sub taux_Change()
'formule:100/(texte box 1.text*100)
'test >0 et pas vide et numerique(.1234567890)
If (taux.Value > 0 And _
taux <> "" And _
IsNumeric(taux)) Then
duree = 100 / (taux.Value * 100)
Else
duree = taux
End If
End Sub





elle renvoi le meme contenu de taux = contenu de durée
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re
Votre code marche sur un de mes fichiers, textebox sur une feuille de calcul ou une UserForm!!!!!
0
yosra_miagi Messages postés 97 Date d'inscription   Statut Membre Dernière intervention  
 
userform
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,
Pouvez vous faire une recopie d'ecran de ce qui s'affiche dans votre textbox, la mettre dans un fichier word et sur: https://www.cjoint.com/ pour voir de quoi il s'agit???

A+
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Bonjour à tous,
mettre le fichier xls est mieux.
eric
0
Réponse 2 / 2
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

Fichier avec une UsF et vos deux TextBox, regardez la difference qu'il y a avec ce que vous avez programme dans votre projet.

https://www.cjoint.com/?BJAiEajIQUc

A+
0