Discussion:
Userform initialize ?
(trop ancien pour répondre)
Alpha
2004-01-21 14:45:11 UTC
Permalink
Bonjour,
je souhaite remettre à chaque lancement de mon userform les textbox à vide,
j'essaye Initialize, cela ne fonctionne pas, alors j'ai accroché au bouton
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?

frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""

Merci
Alpha
michdenis
2004-01-21 14:57:40 UTC
Permalink
Bonjour Alpha,

si cette expression : "remettre à chaque lancement de mon userform " signifie lancer à nouveau le formulaire par la commande
userform1.show , il n'y a aucune raison que cela ne fonctionne pas.

Cependant, si ton formulaire est "déchargée" de la mémoire vive, je ne vois pas la nécessité de ces lignes de commande car à
l'ouverture d'un formulaire, la valeur des différents Contrôles est remise de facto à leur valeur originale ( au moment de la
conception)

Conclusion : Je n'ai pas vraiment compris le sens de ton intervention et la difficulté que tu éprouves .


Salutations!



"Alpha" <***@ducentaure.fr> a écrit dans le message de news:edz%***@TK2MSFTNGP09.phx.gbl...
Bonjour,
je souhaite remettre à chaque lancement de mon userform les textbox à vide,
j'essaye Initialize, cela ne fonctionne pas, alors j'ai accroché au bouton
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?

frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""

Merci
Alpha
Alpha
2004-01-21 15:06:38 UTC
Permalink
Salut Denis, en fait lorsque je valide les différentes données, mon userform
se ferme, et envoie les donnée sur la feuille. Mais au lancement de
celui-ci, je retrouve les mêmes valeurs que précédemment.
J'espère être plus clair ?
Merci
Alpha
Post by michdenis
Bonjour Alpha,
si cette expression : "remettre à chaque lancement de mon userform "
signifie lancer à nouveau le formulaire par la commande
Post by michdenis
userform1.show , il n'y a aucune raison que cela ne fonctionne pas.
Cependant, si ton formulaire est "déchargée" de la mémoire vive, je ne
vois pas la nécessité de ces lignes de commande car à
Post by michdenis
l'ouverture d'un formulaire, la valeur des différents Contrôles est remise
de facto à leur valeur originale ( au moment de la
Post by michdenis
conception)
Conclusion : Je n'ai pas vraiment compris le sens de ton intervention et
la difficulté que tu éprouves .
Post by michdenis
Salutations!
Bonjour,
je souhaite remettre à chaque lancement de mon userform les textbox à vide,
j'essaye Initialize, cela ne fonctionne pas, alors j'ai accroché au bouton
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
Pascal Engelmajer
2004-01-21 15:27:03 UTC
Permalink
Salut,
avec serform1.Hide ?
ou
avec Unload Userform1
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
Post by Alpha
Salut Denis, en fait lorsque je valide les différentes données, mon userform
se ferme, et envoie les donnée sur la feuille. Mais au lancement de
celui-ci, je retrouve les mêmes valeurs que précédemment.
J'espère être plus clair ?
Merci
Alpha
Post by michdenis
Bonjour Alpha,
si cette expression : "remettre à chaque lancement de mon userform "
signifie lancer à nouveau le formulaire par la commande
Post by michdenis
userform1.show , il n'y a aucune raison que cela ne fonctionne pas.
Cependant, si ton formulaire est "déchargée" de la mémoire vive, je ne
vois pas la nécessité de ces lignes de commande car à
Post by michdenis
l'ouverture d'un formulaire, la valeur des différents Contrôles est remise
de facto à leur valeur originale ( au moment de la
Post by michdenis
conception)
Conclusion : Je n'ai pas vraiment compris le sens de ton intervention et
la difficulté que tu éprouves .
Post by michdenis
Salutations!
Bonjour,
je souhaite remettre à chaque lancement de mon userform les textbox à
vide,
Post by michdenis
j'essaye Initialize, cela ne fonctionne pas, alors j'ai accroché au bouton
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
Alpha
2004-01-21 15:31:15 UTC
Permalink
Salut Pascal
Il s'agit de remettre les txtbox vides après validation.
Merci
Alpha
Post by Pascal Engelmajer
Salut,
avec serform1.Hide ?
ou
avec Unload Userform1
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
Post by Alpha
Salut Denis, en fait lorsque je valide les différentes données, mon
userform
Post by Alpha
se ferme, et envoie les donnée sur la feuille. Mais au lancement de
celui-ci, je retrouve les mêmes valeurs que précédemment.
J'espère être plus clair ?
Merci
Alpha
Post by michdenis
Bonjour Alpha,
si cette expression : "remettre à chaque lancement de mon userform "
signifie lancer à nouveau le formulaire par la commande
Post by michdenis
userform1.show , il n'y a aucune raison que cela ne fonctionne pas.
Cependant, si ton formulaire est "déchargée" de la mémoire vive, je ne
vois pas la nécessité de ces lignes de commande car à
Post by michdenis
l'ouverture d'un formulaire, la valeur des différents Contrôles est
remise
Post by Alpha
de facto à leur valeur originale ( au moment de la
Post by michdenis
conception)
Conclusion : Je n'ai pas vraiment compris le sens de ton intervention et
la difficulté que tu éprouves .
Post by michdenis
Salutations!
Bonjour,
je souhaite remettre à chaque lancement de mon userform les textbox à
vide,
Post by michdenis
j'essaye Initialize, cela ne fonctionne pas, alors j'ai accroché au
bouton
Post by Alpha
Post by michdenis
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
Pascal Engelmajer
2004-01-22 07:33:28 UTC
Permalink
Salut Alpha,
j'avais bien compris et ma question (à part l'absence de u a userform1)
était une réponse qu'a bien développée Clément...
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
Post by Alpha
Salut Pascal
Il s'agit de remettre les txtbox vides après validation.
Merci
Alpha
Post by Pascal Engelmajer
Salut,
avec serform1.Hide ?
ou
avec Unload Userform1
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
Post by Alpha
Salut Denis, en fait lorsque je valide les différentes données, mon
userform
Post by Alpha
se ferme, et envoie les donnée sur la feuille. Mais au lancement de
celui-ci, je retrouve les mêmes valeurs que précédemment.
J'espère être plus clair ?
Merci
Alpha
Post by michdenis
Bonjour Alpha,
si cette expression : "remettre à chaque lancement de mon userform "
signifie lancer à nouveau le formulaire par la commande
Post by michdenis
userform1.show , il n'y a aucune raison que cela ne fonctionne pas.
Cependant, si ton formulaire est "déchargée" de la mémoire vive, je ne
vois pas la nécessité de ces lignes de commande car à
Post by michdenis
l'ouverture d'un formulaire, la valeur des différents Contrôles est
remise
Post by Alpha
de facto à leur valeur originale ( au moment de la
Post by michdenis
conception)
Conclusion : Je n'ai pas vraiment compris le sens de ton
intervention
Post by Alpha
et
Post by Pascal Engelmajer
Post by Alpha
la difficulté que tu éprouves .
Post by michdenis
Salutations!
Bonjour,
je souhaite remettre à chaque lancement de mon userform les textbox à
vide,
Post by michdenis
j'essaye Initialize, cela ne fonctionne pas, alors j'ai accroché au
bouton
Post by Alpha
Post by michdenis
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
Clément Marcotte
2004-01-21 15:33:13 UTC
Permalink
Bonjour,

Cela dépend de la façon dont tu fermes ton UserForm.

Si tu le fermes avec Unload, là tu vas générer UserForm_initialize en
l'ouvrant, et en principe, la remise à zéro est automatique.

Si tu le fermes avec Hide, tu ne génères pas UserForm_Initialize en
l'ouvrant et il faut que tu mettes tes instructions de remise à zéro
ailleurs que dans UserForm_initialize.
Post by Alpha
Salut Denis, en fait lorsque je valide les différentes données, mon userform
se ferme, et envoie les donnée sur la feuille. Mais au lancement de
celui-ci, je retrouve les mêmes valeurs que précédemment.
J'espère être plus clair ?
Merci
Alpha
Post by michdenis
Bonjour Alpha,
si cette expression : "remettre à chaque lancement de mon userform "
signifie lancer à nouveau le formulaire par la commande
Post by michdenis
userform1.show , il n'y a aucune raison que cela ne fonctionne pas.
Cependant, si ton formulaire est "déchargée" de la mémoire vive, je ne
vois pas la nécessité de ces lignes de commande car à
Post by michdenis
l'ouverture d'un formulaire, la valeur des différents Contrôles est remise
de facto à leur valeur originale ( au moment de la
Post by michdenis
conception)
Conclusion : Je n'ai pas vraiment compris le sens de ton
intervention et
Post by Alpha
la difficulté que tu éprouves .
Post by michdenis
Salutations!
Bonjour,
je souhaite remettre à chaque lancement de mon userform les
textbox à
Post by Alpha
vide,
Post by michdenis
j'essaye Initialize, cela ne fonctionne pas, alors j'ai accroché au bouton
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
Alpha
2004-01-21 15:49:51 UTC
Permalink
Ok Clément, c'est exactement cela.
Merci beaucoup
Alpha
Post by Alpha
Bonjour,
Cela dépend de la façon dont tu fermes ton UserForm.
Si tu le fermes avec Unload, là tu vas générer UserForm_initialize en
l'ouvrant, et en principe, la remise à zéro est automatique.
Si tu le fermes avec Hide, tu ne génères pas UserForm_Initialize en
l'ouvrant et il faut que tu mettes tes instructions de remise à zéro
ailleurs que dans UserForm_initialize.
Post by Alpha
Salut Denis, en fait lorsque je valide les différentes données, mon
userform
Post by Alpha
se ferme, et envoie les donnée sur la feuille. Mais au lancement de
celui-ci, je retrouve les mêmes valeurs que précédemment.
J'espère être plus clair ?
Merci
Alpha
Post by michdenis
Bonjour Alpha,
si cette expression : "remettre à chaque lancement de mon userform
"
Post by Alpha
signifie lancer à nouveau le formulaire par la commande
Post by michdenis
userform1.show , il n'y a aucune raison que cela ne fonctionne
pas.
Post by Alpha
Post by michdenis
Cependant, si ton formulaire est "déchargée" de la mémoire vive,
je ne
Post by Alpha
vois pas la nécessité de ces lignes de commande car à
Post by michdenis
l'ouverture d'un formulaire, la valeur des différents Contrôles
est remise
Post by Alpha
de facto à leur valeur originale ( au moment de la
Post by michdenis
conception)
Conclusion : Je n'ai pas vraiment compris le sens de ton
intervention et
Post by Alpha
la difficulté que tu éprouves .
Post by michdenis
Salutations!
Bonjour,
je souhaite remettre à chaque lancement de mon userform les
textbox à
Post by Alpha
vide,
Post by michdenis
j'essaye Initialize, cela ne fonctionne pas, alors j'ai accroché
au bouton
Post by Alpha
Post by michdenis
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
michdenis
2004-01-21 15:44:05 UTC
Permalink
Bonjour Alpha,

à partir de tes explications, ton formulaire est toujours en mémoire vive. Probablement que tu utilises la méthode "Hide"
pour masquer ton formulaire. Évidemment, lorsque tu passes la commande à nouveau : Userform1.show , comme le formulaire n'a
pas été totalement déchargé de la mémoire vivre mais seulement masqué, les informations contenues dans les textbox de ton
formulaire sont encore présentes. De plus, tu ne peux compter sur la procédure "Initialize" pour remettre à zéro tes textbox
puisqu'elle s'exécute que si ton formulaire a été déchargé complètement de la mémoire vive par une de ces commandes : End
ou Unload Me.

Pour résoudre ton problème, un bouton de commande qui a pour fonction de remettre à zéro le contenu des textbox au moment
jugé opportun par l'usager !!!


Salutations!


"Alpha" <***@ducentaure.fr> a écrit dans le message de news:%***@TK2MSFTNGP12.phx.gbl...
Salut Denis, en fait lorsque je valide les différentes données, mon userform
se ferme, et envoie les donnée sur la feuille. Mais au lancement de
celui-ci, je retrouve les mêmes valeurs que précédemment.
J'espère être plus clair ?
Merci
Alpha
Post by michdenis
Bonjour Alpha,
si cette expression : "remettre à chaque lancement de mon userform "
signifie lancer à nouveau le formulaire par la commande
Post by michdenis
userform1.show , il n'y a aucune raison que cela ne fonctionne pas.
Cependant, si ton formulaire est "déchargée" de la mémoire vive, je ne
vois pas la nécessité de ces lignes de commande car à
Post by michdenis
l'ouverture d'un formulaire, la valeur des différents Contrôles est remise
de facto à leur valeur originale ( au moment de la
Post by michdenis
conception)
Conclusion : Je n'ai pas vraiment compris le sens de ton intervention et
la difficulté que tu éprouves .
Post by michdenis
Salutations!
Bonjour,
je souhaite remettre à chaque lancement de mon userform les textbox à vide,
j'essaye Initialize, cela ne fonctionne pas, alors j'ai accroché au bouton
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
Alpha
2004-01-21 15:52:34 UTC
Permalink
Merci beaucoup Denis, en effet, ma méthode n'était pas bonne
Alpha
Post by michdenis
Bonjour Alpha,
à partir de tes explications, ton formulaire est toujours en mémoire vive.
Probablement que tu utilises la méthode "Hide"
Post by michdenis
pour masquer ton formulaire. Évidemment, lorsque tu passes la commande à
nouveau : Userform1.show , comme le formulaire n'a
Post by michdenis
pas été totalement déchargé de la mémoire vivre mais seulement masqué, les
informations contenues dans les textbox de ton
Post by michdenis
formulaire sont encore présentes. De plus, tu ne peux compter sur la
procédure "Initialize" pour remettre à zéro tes textbox
Post by michdenis
puisqu'elle s'exécute que si ton formulaire a été déchargé complètement de
la mémoire vive par une de ces commandes : End
Post by michdenis
ou Unload Me.
Pour résoudre ton problème, un bouton de commande qui a pour fonction de
remettre à zéro le contenu des textbox au moment
Post by michdenis
jugé opportun par l'usager !!!
Salutations!
Salut Denis, en fait lorsque je valide les différentes données, mon userform
se ferme, et envoie les donnée sur la feuille. Mais au lancement de
celui-ci, je retrouve les mêmes valeurs que précédemment.
J'espère être plus clair ?
Merci
Alpha
Post by michdenis
Bonjour Alpha,
si cette expression : "remettre à chaque lancement de mon userform "
signifie lancer à nouveau le formulaire par la commande
Post by michdenis
userform1.show , il n'y a aucune raison que cela ne fonctionne pas.
Cependant, si ton formulaire est "déchargée" de la mémoire vive, je ne
vois pas la nécessité de ces lignes de commande car à
Post by michdenis
l'ouverture d'un formulaire, la valeur des différents Contrôles est remise
de facto à leur valeur originale ( au moment de la
Post by michdenis
conception)
Conclusion : Je n'ai pas vraiment compris le sens de ton intervention et
la difficulté que tu éprouves .
Post by michdenis
Salutations!
Bonjour,
je souhaite remettre à chaque lancement de mon userform les textbox à
vide,
Post by michdenis
j'essaye Initialize, cela ne fonctionne pas, alors j'ai accroché au bouton
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
Chris MICHEL
2004-01-21 15:50:49 UTC
Permalink
Bonjour,

essaie:

private sub userform_activate()
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
end sub

Chris
-----Message d'origine-----
Bonjour,
je souhaite remettre à chaque lancement de mon userform
les textbox à vide,
j'essaye Initialize, cela ne fonctionne pas, alors j'ai
accroché au bouton
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par
Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
.
Alpha
2004-01-21 16:06:27 UTC
Permalink
Merci Chris, en fait comme je l'écris dans le post précédent, il s'agissait
d'une mauvaise méthode.
Alpha

"Chris MICHEL" <***@discussions.microsoft.com> a écrit dans le message
de news:14c601c3e036$5794ef20$***@phx.gbl...
Bonjour,

essaie:

private sub userform_activate()
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
end sub

Chris
-----Message d'origine-----
Bonjour,
je souhaite remettre à chaque lancement de mon userform
les textbox à vide,
j'essaye Initialize, cela ne fonctionne pas, alors j'ai
accroché au bouton
de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par
Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
.
JLuc
2004-01-21 20:34:58 UTC
Permalink
Bonjour à toutes, tous et à Alpha,
Post by Alpha
Bonjour,
je souhaite remettre à chaque lancement de mon userform les textbox à
vide, j'essaye Initialize, cela ne fonctionne pas, alors j'ai
accroché au bouton de lancement de mon userform (voir plus bas)
et cela fonctionne, pourquoi je n'y arrive pas par Initialize ?
frm_nouveau_salarié.Txtnom = ""
frm_nouveau_salarié.Txtprénom = ""
frm_nouveau_salarié.TxtnomJF = ""
Merci
Alpha
Je pense que le plus simple est de les initialises des que tu les a mis sur
ta feuille
(dans la meme procedure)
A+
JLuc
Loading...