Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

Pierrot93

XLDnaute Barbatruc

• 16 Novembre 2006

• #2

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

Bonjour Papynou

le code ci dessous à intégrer dans le module de ton USF

Code:

Private Sub TextBox1_Change()
TextBox4 = TextBox1 + TextBox2 + TextBox3
End Sub
Private Sub TextBox2_Change()
TextBox4 = TextBox1 + TextBox2 + TextBox3
End Sub
Private Sub TextBox3_Change()
TextBox4 = TextBox1 + TextBox2 + TextBox3
End Sub

Après il faut voir, faut peut être contrôler la saisie desdonnées dans les "TextBox".

Bon après midi
@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 16 Novembre 2006

• #3

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

Re

j ai été trop vite, ca marche pas en l'état, ca concatène...

désolé...

 

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 16 Novembre 2006

• #4

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres Text

re

en effet ca concatène, les textbox ne gère que du texte(string) d'ou leur nom.

pour additionner leur valeur il faut convertir les données :

TextBox4 = cdbl(TextBox1) + cdbl(TextBox2) + cdbl(TextBox3)

salut

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 16 Novembre 2006

• #5

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

Re Papynou, bonjour Hervé

OK Hervé, mais il me semble que les Textbox doivent être valorisés à l'initialisation de l'USF, sinon "erreur13" !!!

Bonne fin d'après midi
@@

 

Vote positif 0 Vote négatif

Papynou

XLDnaute Occasionnel

• 16 Novembre 2006

• #6

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

re

J'ai saisi le code (modifié) en Private Sub dans la module du Userform mais dès que le point d'insertion est sur le 1er TextBox : Erreur d'éxecution 13 : Icompatibilité de type . 😡

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 16 Novembre 2006

• #7

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

Re Papynou, Hervé

Le code d'hervé je suppose, tu as tenu compte de mon dernier post ou il fallait initialiser les valeurs des Textbox ?

Sinon mets ton fichier en pièce jointe, ce sera plus facile.

@+

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 16 Novembre 2006

• #8

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres Text

Bonjour

Tout dépend comment tu tapes tes virgules (. ou ,) aussi

Tu peux essayer en remplaçant Cdbl par Val

 

Vote positif 0 Vote négatif

Papynou

XLDnaute Occasionnel

• 16 Novembre 2006

• #9

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

re

Les textbox sont effacées à chaque transfert sur la feuille, comment faire ?
J'ai joint le fichier, les mots de passe sont "0000" 😀

 

Dernière édition: 7 Décembre 2006

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 16 Novembre 2006

• #10

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres Text

re

Pierrot93 à dit:

Re Papynou, bonjour Hervé

OK Hervé, mais il me semble que les Textbox doivent être valorisés à l'initialisation de l'USF, sinon "erreur13" !!!

Bonne fin d'après midi
@@

Cliquez pour agrandir...

bien sur pierrot, il faut qu'il y ait quelque choses à convertir, et du numérique, c'est mieux.

salut

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 16 Novembre 2006

• #11

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

Re Papynou, Hervé, Pascal

j'ai modifié un peu ton code :

comme je te le disais précédemment il faut initialisé les valeurs des Textbox, je le fais dans l'évènement "Initialize" de l'USF", je mets les valeurs à "0".

J'ai mis en commentaire tes évènements "KeyPress" qui remettaient à vide la saisie.

J'ai modifié le code de ton bouton "Annuler", qui effacait également les valeurs.

Regarde si ca te va.

@+

PS j'oubliais le fichier...

 

Pièces jointes

• BD.zip

  17.7 KB · Affichages: 260
• BD.zip

  17.7 KB · Affichages: 274
• BD.zip

  17.7 KB · Affichages: 279

Vote positif 0 Vote négatif

Papynou

XLDnaute Occasionnel

• 16 Novembre 2006

• #12

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

re Pierrot et les autres,

Parfaite intervention sur le fichier, merci Pierrot.
J'ai bien compris pourquoi modifier la remise à zéro des textbox mais pourquoi les laisser libres de tout type de saisie ?

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 16 Novembre 2006

• #13

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

Re

Oui Papynou, tu peux enlever les "'" afin d'activer les contrôles, a priori ca marche, je les avaient mis car je pensais que c'était ca qui bloquait à un moment mais en fait c'état le type d'évènement associé aux textbox.

Bonne soirée
@+

 

Vote positif 0 Vote négatif

Papynou

XLDnaute Occasionnel

• 16 Novembre 2006

• #14

Re : Affichage sur le même UserForm dans un TextBox du total de plusieurs autres TextBox

Re Pierrot et les autres,

OK, merci encore Pierrot. 🙂
Bonne continuation à tous
@+

 

Vote positif 0 Vote négatif