Gif dans un userform

[chinel]

Salut tout le monde !!!

quand je mets une image gif dans une userform :

Private Sub UserForm_initialize()
mais je voudrais qu'on ne puisse pas fermer la fenêtre de l'userform car ceci ne fonctionne plus:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As _
Integer)
If CloseMode = vbFormControlMenu Then Cancel = True

il faut choisir soit : _QueryClose ou _initialize
peut on avoir les deux ?

merci de votre aide !!!!

 

[Temjeh]

Re : Gif dans un userform

Bonjour

Moi je met ceci dans le code du UserForm et ca déactive le X:

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

A+

Temjeh