Discussion :

[guigui5931]

Bonjour à tous

J'ai une fonction qui ferme tous les formulaires ouvert de cette manière :

Code :

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

1
2
3
4
5
6
7
 
Dim frm As Form
' Enumère la collection Forms.
For Each frm In Forms
   ' Ferme le formulaire.
    DoCmd.Close acForm, frm.Name, acSaveNo
Next frm

et dans mes formulaire j'ai un test dans l'évenement UnLoad pour savoir si l'utlisateur a modifié quelque chose ou non. Si oui une MsgBox propose d'enregistrer avec oui non ou annuler. Si on fait annuler cela déclanche le code

Code :

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

1
2
 
Cancel=true

du Unload du formulaire.
Le problème c'est qu'il m'affiche une erreur "L'action Close a été annulé"
sauf que pour moi ce n'est pas une erreur c'est ce que je voulais faire.
N'y a t il pas un moyen d'empecher l'affichage de ce message?

Merci d'avance

[Demco]

As-tu essayé avec un bon vieux

Code :

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

Docmd.SetWarning False

?
En esperant t'aider.

[guigui5931]

Non ça ne marche pas j'avoue que j'avais pas essayer
En fet ce n'est pas un message de confirmation mais un message d'erreur

[Demco]

Oh ok une erreur, j'avais raté ce detail.

Eh bien dans ce cas intercepte l'erreur avec un On Error goto ... Tu trouveras pas mal d'exemples sur le forum.

En esperant t'aider.

[guigui5931]

Ca marche nikel merci beaucoup