Discussion :

[laurentabj]

Bonjour à tous !

Existe t-il une propriété de l'objet userForm permettant de tester si ce dernier est chargé ?

En effet, à un endroit de mon code je voudrais pouvoir utiliser

Code :

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

Unload monUserForm

alors que je ne sais pas si mon UserForm été initialisé.

Apparemment, lorsqu'on "unload" un formulaire non chargé, on obtient une erreur ?

Merci d'avance pour votre aide

[dro414]

Bonjour,

deux possibilités :
tu declare un booleen public que tu passe a true lors du load userform, et tu test cette valeur pour ton unload
dans ton userform , tu mets un bouton , et lorsque tu clique sur ce bouton , tu mets le code

Code :

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

1
2
 
unload me

[laurentabj]

Merci dro414 pour ton aide

OK pour le booleen public. Ca ne m'arrange pas vraiment mais bon, s'il le faut...

Pour le unload me, je ne peux pas car je récupère des données présente sur le userform après le

Code :

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

me.hide

Donc pas de propriété spécifique pour tester ça ?

[tirex28]

Bonjour,

Une petite recherche: http://www.developpez.net/forums/sho...d.php?t=408476

Cordialement,

Tirex28/

[dro414]

En fait d'habitude je contourne ce probleme, en utilisant des variables public qui stocke les caption des elements du userform, donc une fois fini la saisie l'utilisateur clique sur ok et je lance le unload me.
Cette methode me permet aussi de mettre un bouton d'annulation sur le userform et de verifier qu'il n'a pas clique dessus.
Je n'aime pas trop laisser les userform ouvert, a part quand il sont dans l'etat showmodal=false

Bon Courage

[LeForestier]

Bonjour,
et en ajoutant...

Code :

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

1
2
    on error resume Next
    Unload monUserForm

A+

[laurentabj]

Merci à tous pour vos réponses et recherches(plus fructuseuses que les miennes).
Vos réponses me conviennent parfaitement

[fred65200]

Tu peux aussi faire

Code :

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

1
2
3
4
5
's'il y a un erreur on passe à la ligne de code suivante
On Error Resume Next
Unload monUserForm
'on efface la valeur d'erreur et on annule le On Error Resume Next
Err.Clear: On Error Goto 0

Salutations