Dangeureux ton code Dav78 ! Car avec ce code, il ne pourra jamais arrêter son appli meme en faisant un "Unload Me" dans son code. Il ne pourra faire qu'un "End" et c'est tres dangeureux aussi d'utilsier le "End".
Avant de mettre cancel = True, il faut vérifier la valeur de UnloadMode et s'assurer qu'elle indique bien une demande de fermeture par l'utilisateur ! Il faudrait donc mieux mettre ceci :
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) If UnloadMode = vbFormControlMenu Then Cancel = True End Sub
|
Christophe R.