événement sur closebox de userform

[arnaud]

Bonjour
1) existe t-il un événement sur la closebox d'une userform que l'on peut utiliser dans une procédure ?

pour un workbook on a :

private sub Workbook_BeforeClose()

existe t-il :

private sub Userform_BeforeClose()

2) est il possible d'enlever la closebox d'une userform ?

 

[Ti]

en fait dans un userform, c'est beforeQueryClose, mais ça revient au même. Pour enlever la croix d'un userform, il y a des méthodes, qui passent par les API. Je ne le conseille pas. Par contre tu peux désactiver cette croix, tu peux utiliser la méthode suivante, trouvée chez Stephen Bullen ou J. Walkenbach (je ne sais plus)
Disabling a UserForm's Close Button
This tip applies to Excel 97 or later

Every UserForm that you create contains a Close button ("x") in its title bar. Clicking the Close button (or pressing Alt+F4) closes the UserForm. In some cases, you may not want to allow the user to close the UserForm in this manner. There's no easy way to disable the Close button, but a few lines of VBA code will prevent it from being used.


Private Sub UserForm_QueryClose _
(Cancel As Integer, CloseMode As Integer)
' Prevents use of the Close button
If CloseMode = vbFormControlMenu Then
MsgBox "Clicking the Close button does not work."
Cancel = True
End If
End Sub
When the user clicks the Close button, a message box appears and the UserForm remains open.

 

[arnaud]

Merci beaucoup
c'est tout ce qu'il me faut
a bientôt