Fermeture Form et Excel [Résolu]

Messages postés
10
Date d'inscription
mercredi 23 août 2006
Dernière intervention
22 novembre 2006
- - Dernière réponse : drikce06
Messages postés
2247
Date d'inscription
lundi 29 mai 2006
Dernière intervention
29 mai 2008
- 8 nov. 2006 à 15:15
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
Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
Messages postés
7401
Date d'inscription
mercredi 23 avril 2003
Dernière intervention
6 avril 2012
47
3
Merci
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

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 123 internautes nous ont dit merci ce mois-ci

Commenter la réponse de jrivet
Messages postés
2247
Date d'inscription
lundi 29 mai 2006
Dernière intervention
29 mai 2008
6
3
Merci
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

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 123 internautes nous ont dit merci ce mois-ci

Commenter la réponse de drikce06
Messages postés
10
Date d'inscription
mercredi 23 août 2006
Dernière intervention
22 novembre 2006
0
Merci
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!!!
Commenter la réponse de Nikos620

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.