bijour !!!  
 
qq sait comment gerer la croix pour fermer sur une MDIForm ??    
 
en fait je voudrais pas que ca ferme l'appli mais que ca demande avant confirmation ...
 
merci d'avance pour vos reponses !!  

Dans l'evenement UNLOAD de ta feuille MDI (par exe MDIForm), tu tapes :
 
Private Sub MDIForm_Unload(Cancel As Integer)
 
Dim rep as string
 
rep = msgbox ("Voulez-vous decharger la feuille ?", vbyesno)
if rep = vbyes then
    Cancel = True
else
    end
end if
 
End Sub
 
 
 
Voualaaa !

super c ca !!!
 
par contre c'est l'inverse entre le oui et le non    
 
 
merci bcp  

Ah oui... au temps pour moi

par contre tu sait pas comment faire pour pas que ca ferme les MDI_Child ?
 
parceque la ca me le fait et donc ca pert tout ce qui n'a pas ete sauvagarde ...
 
Merci !!

C'est pareil, il faut que tu ailles dans l'evenement unload de ta feuille et que tu joues avec la valeur booleenne cancel
 
Admettons que ta feuille s'appelle form :
 
Private Sub Form_Unload(Cancel As Integer)
Cancel = True 'Empêche la sortie de la feuille
 
Cancel = false 'autorise la sortie de la feuille
 
End Sub
 
 
Vouala, j'espère avoir été clair ;-)

Private Sub MDIForm_Unload(Cancel As Integer)
 
Dim rep as string
 
rep = msgbox ("Voulez-vous decharger la feuille ?", vbyesno)
if rep = vbno then Cancel = True
 
End Sub
 
Tu gagnes quelques lignes...  

 
ok !!
et faut faire ca pour chacune des MDI_Child ( ou g rien compris alors   )

Ben voui

oky !!
 
merci beaucoup !!

Juste pour dire qu'en utilisant l'evenement QueryUnload (qui se produit juste avant Unload), tu peux controler la cause du dechargement de la feuille ( et n'afficher le message que si l'utilisateur a cliqué sur la croix, et pas si windows veux se fermer).