USerform lance macro si on clique sur la croix.

Staple1600

XLDnaute Barbatruc

• 19 Novembre 2008

• #2

Re : USerform lance macro si on clique sur la croix.

Bonjour

Code:

Private Sub UserForm_Terminate()
macroz
End Sub

Code:

sub macroz()
MsgBox "toto"
end sub

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 19 Novembre 2008

• #3

Re : USerform lance macro si on clique sur la croix.

Bonjouir Staple

Merci beaucoup

Je le connaissais pas cet évènement.

Ah oui en effet il existe, je l'avais même pas vu, pourtant j'en avais testé.

 

Vote positif 0 Vote négatif

D

d.ryba

Guest

• 19 Novembre 2008

• #4

Re : USerform lance macro si on clique sur la croix.

Staple1600 à dit:

Bonjour

Code:

Private Sub UserForm_Terminate()
macroz
End Sub

Code:

sub macroz()
MsgBox "toto"
end sub

Cliquez pour agrandir...

Bonjour,

moi j'utilise "Query_Close" avec une macro MsgBox, pour demander à l'utilisateur une confirmation pour quitter :

Voila mon code que j'utilise, et qui fonctione parfaitement :

Code:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    Dim Reponse As VbMsgBoxResult
    If CloseMode = 0 Then
        Reponse = MsgBox("Etes-vous sûr de vouloir fermer l'application en cours ?", _
   vbYesNo + vbQuestion, "Annuler l'application en cours ?")
        If Reponse = vbNo Then
            Cancel = True
        End If
    End If
End Sub

Mais il y a-t-il une différence, entre "teminate" et "query_Close" ?

 

Dernière modification par un modérateur: 19 Novembre 2008

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 19 Novembre 2008

• #5

Re : USerform lance macro si on clique sur la croix.

Bonjour d.ryba

Merci aussi pour cette solution qui peut servir (comme cela le code est déjà tout fait).

Sinon, j'ai l'impression que le query_close s'exécute avant le terminate.

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 19 Novembre 2008

• #6

Re : USerform lance macro si on clique sur la croix.

Bonjour

L'avantage avec le query_close tu peux verifier le mode de fermeture
si l'usf est fermé par la crois ou si par exemple il est fermé par du code

 

Vote positif 0 Vote négatif