Fermeture Form et Excel [Résolu]

Signaler
Messages postés
10
Date d'inscription
mercredi 23 août 2006
Statut
Membre
Dernière intervention
22 novembre 2006
-
Messages postés
2237
Date d'inscription
lundi 29 mai 2006
Statut
Membre
Dernière intervention
29 mai 2008
-
Bonjour,

- comment fait-on pour fermer une form avec la croix en haut à droite de la form ? (Pour l'instant j'utilise form.hide...mais l'application n'est pas fermée et ca bugge quand on relance l'appli!)
- comment fait-on pour fermer "proprement" excel et une application active en utilisant une macro ?

J'utilise vb6. Si quelqu'un peut me filer un p'tit coup de pouce!

D'avance merci.

Nikos620

3 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
50
Salut,

Pour bien décharger les objet UserForm utilises Call UnLoad(NomDuUserForm) ou bien si c'est directement dans le code du UserForm Call Unload (Me)

POur fermer EXcel depuis VB6
Utilises les Procédures
Close de tes objets Classeur et
Quit de ton objet Application
@+: Ju£i?n
Pensez: Réponse acceptée
Messages postés
2237
Date d'inscription
lundi 29 mai 2006
Statut
Membre
Dernière intervention
29 mai 2008
10
Salut

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)


If Cancel = 0 Then


z = MsgBox("Etes vous sûr de vouloir quitter cette application?", vbYesNo, "Confirmer l'annulation")
 
  If z = 6 Then


     End
     
  End If
  End If
Cancel = 1


End Sub

 Drikce 06
Messages postés
10
Date d'inscription
mercredi 23 août 2006
Statut
Membre
Dernière intervention
22 novembre 2006

Euh j'ai essayé autre chose Query_Close...de la manière suiavnte :


Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
   If CloseMode = vbFormControlMenu Then
   
   End If
End Sub


mais lors de la fermeture (click sur la croix en haut à droit) du UserForm la fonction Query_Close n'est pas  exécutée....

Y-a-t-il une erreur dans mon code ?

Thanks for your help!!!