Vérifier le conenu non nul de text box dans un userform

[jf27]

bonjour,


j'entre des données dans un userform via des text box

Ces données servent ensuite à faire des calculs dont les fameuses division !

Comment contrôler lors de la validation du userform que ces text box contiennent bien une valeur et sinon demander d'entrer une valeur non nulle pour ces textbox.

Idéalement en bouclant sur une liste de textbox définie.


D'avance merci

jf 27

 

[smotty]

Re : Vérifier le conenu non nul de text box dans un userform

Bonjour,

Si tu as plusieurs textbox dans ton userform tu peux faire une boucle comme ça:

ok=true
for each Ctr in userform.controls
if typename(Ctr)="textbox" then
if ctr.value="" then blOk=false
end if
next ctr

if blOk=false then
msgbox "il manque des informations": exit sub
end if

Voilà une idée qui j'espère t'aidera

Cordialement

 

[jf27]

Re : Vérifier le conenu non nul de text box dans un userform

merci, en effet c'est une bonne base pour adapter à mon besoin

@+

 

[kjin]

Re : Vérifier le conenu non nul de text box dans un userform

Bonjour,

...
Ces données servent ensuite à faire des calculs dont les fameuses division !
Comment contrôler lors de la validation du userform que ces text box contiennent bien une valeur et sinon demander d'entrer une valeur non nulle pour ces textbox.
Idéalement en bouclant sur une liste de textbox définie...

Avec un fichier exemple, il sera plus facile de répondre à ta demande
Par ailleurs, non seulement, tu dois vérifier la Présence d'une valeur mais aussi son Type, parce ce que diviser Yvonne par Marcel...
Smotty, il me semble qu'il y a une erreur ligne 1 de ton code
A+
kjin

 

[smotty]

Re : Vérifier le conenu non nul de text box dans un userform

bonjour kjin,

effectivement il faudrait mettre blOk=true et non ok=true.