le "X" et ALT F4

[Eric Boucher]

allo tout le monde je voudrais savoir si il est possible de désactivé le "X" dans les userform et les touche ALT F4. Il faut que je trouve une façon de le faire sinon mon travail devien trop vulnérable

Merci à l'avance a tous les répondants

Eric Boucher
( god hate us all, Slayer 2002 )

 

[Vériland]

Bonsoir Eric et toi le forum,

Ceci fera ce que tu souhaites...

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

à placer dans le code de l'userform...

Par contre je te conseille FORTEMENT, d'inclure un bouton "Sortie" dans cet userform (Unload Me),auquel cas tu risques d'être bloqué...pas glop !

PS : Macro à copier depuis le forum auquel cas tu risques d'avoir les attributs gras du post dedans...

 

[Eric Boucher]

voici ma propre reponse
j'ai trouver

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
Cancel = True
MsgBox "Désoler! Vous ne pouvez fermer l'application de cette façon"
End If
End Sub

 

[Vériland]

ah ben tu as trouvé...c'est bon...lol

par contre ne pas oublier le bouton "Sortie"...ouarf!

bonne programmation

 

[charli]

empecher fermeture excel par X

Bonjour le forum,
Quelqu'un connaît il la manip pour empecher la fermeture d'excel par "X"
Merci
A +