CROIX De Fermeture d'un USF

[gds35]

Mes AMIS DU FORUM Bonjour ,

Je desire lancer une procédure si un utilisateur appui sur la croix d'un USF,
J'ai tenter Userform.desactivate , puis Userform.terminate ss succes.
Quelle serait la bonne methode pour lancer un autre usf sans fermer le précédent.

Merci de votre aide.

Bonne soirée Cordialement GDS35

 

[Pierrot93]

Re : CROIX De Fermeture d'un USF

Bonsoir,

regarde peut être du coté de l'événement "UserForm_QueryClose".

bonne soirée
@+

 

[Pierrot93]

Re : CROIX De Fermeture d'un USF

Re

pour être un peu plus complet :

Option Explicit
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = 0 Then UserForm2.Show
End Sub

@+

Edition : erreur entre cancel et closemode

 

[gds35]

Re : CROIX De Fermeture d'un USF

Bonjour Pierrot ,
Merci tout d'Abord
Je n'ai pas eu le temps jusqu'a hier soir de tester ta solution ......
2 Chose qui m'interpellesnt : 1 / Comprends pas Edition : erreur entre cancel et closemode et 2/ ou placer ton code ??? car ta solution ne marche pas si je place le code dans le Code de l'USF Menu.

Cordialement . GDS35

 

[Pierrot93]

Re : CROIX De Fermeture d'un USF

Bonjour,

j'avais mis dans un premier temps :

If Cancel = 0 Then UserForm2.Show

alors que c'est bien :

If CloseMode = 0 Then UserForm2.Show

Ce code est à placer dans le module de l'USF dont tu veux contrôler la fermeture par la croix.

bon après midi
@+

 

[gds35]

Re : CROIX De Fermeture d'un USF

Salut PIERROT93

Merci pour ces precisions . Maintenant mon prg fonctionne a merveille.
Bonne soirée. GDS35