interdire effacement userform avec croix rouge en nhaut à droite.

[bellous]

Bonjour,

J'ai créé un userfrome avec sélection et boutons oui et non. je voudrai obliger l'utilisateur à sélectionner un bouton. C'est à dire interdire de fermer l'userform par l'utilisation de la croix rouge en hau et à droite de l'userform. Est-ce possible ?
Merci de votre aide

 

[thomlau]

Re : interdire effacement userform avec croix rouge en nhaut à droite.

Bonjour Bellous.

En faisant une simple recherche sur le forum avec les mots clés interdire fermeture userform

J'ai trouvé ceci :

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = 0 Then Cancel = True
End Sub

++

 

[wilfried_42]

Re : interdire effacement userform avec croix rouge en nhaut à droite.

Bonjour

voici une macro sur l'interruption de la croix

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = 0 Then
MsgBox "Non plus, pas de sortie par ici"
Cancel = True
End If
End Sub

 

[bellous]

Re : interdire effacement userform avec croix rouge en nhaut à droite.

Merci thomlau, merci wilfried 42,

Je vais essayer

 

[bellous]

Re : interdire effacement userform avec croix rouge en nhaut à droite.

j'ai essayé mais je n'ai pas réussi.
Comment, au début de ma macro, appeler le private sub de ton exemple et remettre les choses en place à la fin.

 

[thomlau]

Re : interdire effacement userform avec croix rouge en nhaut à droite.

Ceci est le code à mettre dans le code de l'USF qui ne doit pas être fermé par la croix rouge

 

[bellous]

Re : interdire effacement userform avec croix rouge en nhaut à droite.

Merci beaucoup thomlau, c'est parfait
Bonne après-midi