Fermeture Form et Excel [Résolu]

Nikos620 10 Messages postés mercredi 23 août 2006Date d'inscription 22 novembre 2006 Dernière intervention - 6 nov. 2006 à 15:50 - Dernière réponse : drikce06 2247 Messages postés lundi 29 mai 2006Date d'inscription 29 mai 2008 Dernière intervention
- 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
jrivet 7401 Messages postés mercredi 23 avril 2003Date d'inscription 6 avril 2012 Dernière intervention - 6 nov. 2006 à 16:00
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

Merci jrivet 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 102 internautes ce mois-ci

Commenter la réponse de jrivet
Meilleure réponse
drikce06 2247 Messages postés lundi 29 mai 2006Date d'inscription 29 mai 2008 Dernière intervention - 8 nov. 2006 à 15:15
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

Merci drikce06 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 102 internautes ce mois-ci

Commenter la réponse de drikce06
Nikos620 10 Messages postés mercredi 23 août 2006Date d'inscription 22 novembre 2006 Dernière intervention - 8 nov. 2006 à 15:08
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.