Discussion :

[vbword]

Bonjour

Après recherches dans les forums sans succès, j'ouvre un nouveau post

Je travaille sur une macro vba word, dans laquelle j'ai 6 textbox ... c'est pour mes impôts ... frais réels

Dans la 1ère nommée txtjours, j'y saisis un nombre
Dans le 2ème nommée txtkms, j'y saisis un nombre
Dans le 3ème nommée txttotal_kms, il faudrait le calcul auto de la multiplication de la 1ère et de la 2ème
Dans la 4ème nommée txtbarème, j'y saisis un nombre
Dans la 5ème nommée txtindice, j'y saisis un nombre
Dans la 6ème nommée txtrésultat, le résultat de tout ce calcul vient s'agrémenter en auto

La calcul final doit être le suivant :
( txttotal_kms x txtbarème ) + txtindice = txtrésultat

Si quelqu'un peut m'aider ... merci d'avance

[Heureux-oli]

Salut,

Peut-être un peu de lecture ?

http://heureuxoli.developpez.com/off...d/formulaires/

Mais point besoin de VBA, on peut le faire avec un ou des champs.

[vbword]

??? comprend pas ...

[Heureux-oli]

Salut,

??
On peut faire des calculs avec des champs.
http://heureuxoli.developpez.com/off...mps/#LIV-C-1-a

[vbword]

OK ... j'avais plus ou moins compris, mais là j'ai d'autres besoins similaires sur d'autres formulaires pour lesquels j'ai besoin d'une macro ... donc c'est pour cela que je fais cette demande ...

[Heureux-oli]

Salut,

C'est quand même dans les tutos que j'ai mis en lien.

[vbword]

Ah OK ... bah ça veut dire qui j'y comprend rien alors ...

[Heureux-oli]

Salut,

Dans le tuto sur les formulaires, j'y explique comment récupérer les données.
Il suffit de faire les opérations sur les données récupérées.
On y explique aussi comment injecter le résultat dans un autre champ de formulaire.

[vbword]

Ah ... OK ... bah c'est bien ce que je disais ... j'y comprend rien ...

Je débute dans le VBA, donc tout ça pour moi excuses moi mais je nage ...

Bon c'est pas grave je vais faire autrement ...

[vbword]

Bon finalement après recherches, j'ai finis par trouver quelquechose
Je place ce code sous un bouton de commande et le tour est joué

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TextBox3 = CDbl(Me.TextBox1) + CDbl(Me.TextBox2)

[Heureux-oli]

Salut,

C'est un UserForm que tu utilises.
J'étais parti sur un formulaire.

[vbword]

Non mais tu sais quoi, je parle toujours d'un formulaire, alors que je devrais utiliser le terme de UserForm, effectivement ...

Je vais tacher de me corriger pour l'avenir ... d'ailleurs j'ai un autre sujet en cours, je vais corriger ...