TextBox dans calculs et résultats dans TextBox

[jp50130]

Bonjour,

J'ai créé une userform afin d'y saisir des données à utiliser dans un calcul et retourner les résultats. J'ai besoin d'une aide pour la rédaction de la macro qui me servira ensuite de modèle afin d'améliorer le projet.
J'apprécierai si vous ajoutiez des commentaires d'explication, je ne suis pas un expert en la matière.

Je vous remercie de votre attention et de votre aide.

Jean-Pierre

 

[matrix]

Re : TextBox dans calculs et résultats dans TextBox

Bonjour,

Voici une façon simple de faire l'addition.

 

[jp50130]

Re : TextBox dans calculs et résultats dans TextBox

Merci Matrix de cette réponse.
J'en prends note.

Cordialement

Jean-Pierre

 

[jp50130]

Re : TextBox dans calculs et résultats dans TextBox

Il subsiste un problème lors de la saisie des données. Si je tape le point du clavier numérique, la macro ne fonctionne pas. Il me faut saisir une virgule.
Quelle est la commande qui permet de contourner ce problème ?

Merci

Jean-Pierre

 

[Pierrot93]

Re : TextBox dans calculs et résultats dans TextBox

Bonsoir,

code ci dessous, à placer dans le module de l'usf, remplace le point par la virgule, nom du textbox à adapter.

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    If KeyAscii = 46 Then KeyAscii = 44
End Sub

bonne soirée
@+

 

[jp50130]

Re : TextBox dans calculs et résultats dans TextBox

Bonsoir,

Merci de me répondre, mes textbox sont utilisées dans un
Private Sub CommandButton1()

Une série de calculs intègre les TextBox. Je ne vois pas trop où intégrer la commande indiquée.

Merci

Jean-Pierre

 

[Pierrot93]

Re : TextBox dans calculs et résultats dans TextBox

Bonjour Jean-Pierre

tu colles tout simplement le code dans le module de ton USF, en modifiant le nom "TextBox1" par le nom du texbox concerné, et ce pour chaque "textbox" que tu veux controler.

Bonne journée
@+

 

[jp50130]

Re : TextBox dans calculs et résultats dans TextBox

Bonjour Pierrot,

Merci de ton aide, mon problème est résolu. Enfin, celui-là.
C'est au pas à pas que j'avance.
Patience et ... aide

Bonne journée

Jean-Pierre