J'ai un userform contenant des textbox devant recevoir des valeurs num=E9ri=
ques.
Je souhaite faire la somme des textboxs d=E8s lors qu'une textbox re=E7oit =
une valeur.
Exemple:
premi=E8re entr=E9e: TB1 =3D 10 (le label nomm=E9 "Total " =3D 10)
deuxi=E8me entr=E9e: TB2 =3D 0.5 (le label nomm=E9 "Total " =3D 10.5)
troisi=E8me entr=E9e: TB3=3D 4 (le label nomm=E9 "Total " =3D 14.5)
.
.
.
Un textbox vide prend la valeur 0 dans la somme des textboxs
Attention dans l'exemple joint, les textboxs ont =E9t=E9 renomm=E9s. TB1 =
=E0 TB8
Bonjour Denis, je regarde le fichier exemple. Je reviendrai vers toi en cas de problème.
Merci
JP
JP
Bonjour Denis,
Je reviens vers toi car sur des fichiers simples j'arrive facilement à ad apter ton exemple. En revanche sur un projet un peu plus lourd, j'ai une er reur qui persiste et pour laquelle je ne trouve pas la solution. Peux-tu STP regarder pourquoi ce blocage?
http://cjoint.com/?3KihsinA5f5
Merci d'avance pour tes explications.
JP
Bonjour Denis,
Je reviens vers toi car sur des fichiers simples j'arrive facilement à ad apter ton exemple. En revanche sur un projet un peu plus lourd, j'ai une er reur qui persiste et pour laquelle je ne trouve pas la solution.
Peux-tu STP regarder pourquoi ce blocage?
Je reviens vers toi car sur des fichiers simples j'arrive facilement à ad apter ton exemple. En revanche sur un projet un peu plus lourd, j'ai une er reur qui persiste et pour laquelle je ne trouve pas la solution. Peux-tu STP regarder pourquoi ce blocage?
http://cjoint.com/?3KihsinA5f5
Merci d'avance pour tes explications.
JP
MichD
Bonjour,
Dans ton Userform3, en mode création, pour ton contrôle étiquette recevant la somme des textbox, la propriété "caption" de ce "Label" doit être vide.
De retour, car dans l'exemple fichier joint message plus haut,l'userform3 s 'ouvre (se redimensionne) et les textboxs dans la partie inférieure. Le l abel 156 n'est pas concerné par les textboxs inférieurs. Seules les textboxs situés en partie haute sont concernés.
Par ailleurs, si le combobox classe (CB_Classe)est modifié, il y a un pl antage.
Merci pour les idées.
JP
De retour, car dans l'exemple fichier joint message plus haut,l'userform3 s 'ouvre (se redimensionne) et les textboxs dans la partie inférieure. Le l abel 156 n'est pas concerné par les textboxs inférieurs.
Seules les textboxs situés en partie haute sont concernés.
Par ailleurs, si le combobox classe (CB_Classe)est modifié, il y a un pl antage.
De retour, car dans l'exemple fichier joint message plus haut,l'userform3 s 'ouvre (se redimensionne) et les textboxs dans la partie inférieure. Le l abel 156 n'est pas concerné par les textboxs inférieurs. Seules les textboxs situés en partie haute sont concernés.
Par ailleurs, si le combobox classe (CB_Classe)est modifié, il y a un pl antage.
Merci pour les idées.
JP
JP
A nouveau le fichier avec des données entrées sur les 3 premières cla sses. Le combobox en question est CB_PROF et non CB_CLASSE! :-)
JP
http://cjoint.com/?3KivTxappLM
A nouveau le fichier avec des données entrées sur les 3 premières cla sses.
Le combobox en question est CB_PROF et non CB_CLASSE! :-)
A nouveau le fichier avec des données entrées sur les 3 premières cla sses. Le combobox en question est CB_PROF et non CB_CLASSE! :-)
JP
http://cjoint.com/?3KivTxappLM
MichD
Quand tu modifies le combobox "CB_Classe" de l'userform3, dans le module de classe dans cette procédure :
Private Property Let SommeVar(ByVal Som As Variant)
Total = CDbl(Som)
Som contient une date avec ce format "25/12/2013" . La procédure est faite pour additionner des nombres dans des textbox et nom des dates. Pour que cela fonctionne il faudrait écrire : Total(CDbl(Cdate(Som)) mais dans le contexte cela ne fait aucun sens!
Pour ce qui est des Textbox c'est quoi le problème, tu veux les redimensionner? Moi, je n'ai pas compris.
MichD --------------------------------------------------------------- "JP" a écrit dans le message de groupe de discussion :
De retour, car dans l'exemple fichier joint message plus haut,l'userform3 s'ouvre (se redimensionne) et les textboxs dans la partie inférieure. Le label 156 n'est pas concerné par les textboxs inférieurs. Seules les textboxs situés en partie haute sont concernés.
Par ailleurs, si le combobox classe (CB_Classe)est modifié, il y a un plantage.
Merci pour les idées.
JP
Quand tu modifies le combobox "CB_Classe" de l'userform3,
dans le module de classe dans cette procédure :
Private Property Let SommeVar(ByVal Som As Variant)
Total = CDbl(Som)
Som contient une date avec ce format "25/12/2013" . La procédure est faite
pour additionner des nombres dans des textbox et nom des dates. Pour que
cela fonctionne il faudrait écrire : Total(CDbl(Cdate(Som)) mais dans le
contexte
cela ne fait aucun sens!
Pour ce qui est des Textbox c'est quoi le problème, tu veux les
redimensionner?
Moi, je n'ai pas compris.
MichD
---------------------------------------------------------------
"JP" a écrit dans le message de groupe de discussion :
9c3493a4-1eb4-4781-863c-e80da4843db9@googlegroups.com...
De retour, car dans l'exemple fichier joint message plus haut,l'userform3
s'ouvre (se redimensionne) et les textboxs dans la partie inférieure. Le
label 156 n'est pas concerné par les textboxs inférieurs.
Seules les textboxs situés en partie haute sont concernés.
Par ailleurs, si le combobox classe (CB_Classe)est modifié, il y a un
plantage.
Quand tu modifies le combobox "CB_Classe" de l'userform3, dans le module de classe dans cette procédure :
Private Property Let SommeVar(ByVal Som As Variant)
Total = CDbl(Som)
Som contient une date avec ce format "25/12/2013" . La procédure est faite pour additionner des nombres dans des textbox et nom des dates. Pour que cela fonctionne il faudrait écrire : Total(CDbl(Cdate(Som)) mais dans le contexte cela ne fait aucun sens!
Pour ce qui est des Textbox c'est quoi le problème, tu veux les redimensionner? Moi, je n'ai pas compris.
MichD --------------------------------------------------------------- "JP" a écrit dans le message de groupe de discussion :
De retour, car dans l'exemple fichier joint message plus haut,l'userform3 s'ouvre (se redimensionne) et les textboxs dans la partie inférieure. Le label 156 n'est pas concerné par les textboxs inférieurs. Seules les textboxs situés en partie haute sont concernés.
Par ailleurs, si le combobox classe (CB_Classe)est modifié, il y a un plantage.
Merci pour les idées.
JP
JP
Bonjour Denis,
Merci déjà pour l'information.
Je voudrais que dans l'userform3: 1) A l'ouverture, la somme des testboxs de TB_1 à TB_15 se fasse dans le label156 2) que quand je change de classe ou la période, la somme se fasse aussi. 3) et enfin, si je modifie ou ajoute une valeur dans ces textboxs la somme se fasse aussi.
Simple à dire, à faire, je ne sais pas! Si tu veux que j'ajoute des valeurs dans le tableau de l'onglet BD_PFMP, di s le moi. La situation serait plus proche de la réalité.
Merci d'avance
JP
Bonjour Denis,
Merci déjà pour l'information.
Je voudrais que dans l'userform3:
1) A l'ouverture, la somme des testboxs de TB_1 à TB_15 se fasse dans le label156
2) que quand je change de classe ou la période, la somme se fasse aussi.
3) et enfin, si je modifie ou ajoute une valeur dans ces textboxs la somme se fasse aussi.
Simple à dire, à faire, je ne sais pas!
Si tu veux que j'ajoute des valeurs dans le tableau de l'onglet BD_PFMP, di s le moi. La situation serait plus proche de la réalité.
Je voudrais que dans l'userform3: 1) A l'ouverture, la somme des testboxs de TB_1 à TB_15 se fasse dans le label156 2) que quand je change de classe ou la période, la somme se fasse aussi. 3) et enfin, si je modifie ou ajoute une valeur dans ces textboxs la somme se fasse aussi.
Simple à dire, à faire, je ne sais pas! Si tu veux que j'ajoute des valeurs dans le tableau de l'onglet BD_PFMP, di s le moi. La situation serait plus proche de la réalité.
Merci d'avance
JP
MichD
Fichier retour : http://cjoint.com/?CKjmQxNBm3M
J'ai modifié le nom des textbox de 1 à 15 du type TB1 pour TB_1 et modifié leur appellation dans le module du formulaire.
J'ai aussi apporté quelques corrections dans la procédure du formulaire UserForm_Initialize
