Empêcher de fermer une UserForm sous VBA (Excel)

Empêcher de fermer une UserForm sous VBA (Excel) - VB/VBA/VBS - Programmation

Marsh Posté le 03-03-2006 à 16:41:59    

Bonjour,
 
je débute sous VBA et j'aurais bien voulu empêcher de fermer une UserForm.  
Est-ce possible ? Est-ce à modifier dans les propriétés de la UserForm ou faut-il rajouter du code ?
 
Merci pour votre aide.


---------------

Reply

Marsh Posté le 03-03-2006 à 16:41:59   

Reply

Marsh Posté le 03-03-2006 à 23:54:36    

Salut,
 
Tu peux empêcher la fermeture avec son évènement Query_Close :
 
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
'Si telle condition n'est pas remplie
'donner la valeur True à Cancel pour  
'invalider la fermeture de la fenêtre :
'Cancel = True
End Sub
 
A+
Horatio


Message édité par Lord Nelson le 03-03-2006 à 23:55:07
Reply

Marsh Posté le 05-03-2006 à 13:09:41    

Merci beaucoup
En plus, j'ai trouvé un autre bout de code qui supprime carrément la croix de la UserForm.


---------------

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed