Soucis pour un Unload de Userforms en cascades

Bonjour à tous,

Je travail sur un fichier presque finis, mais j'ai un gros problème:

je gère l'événement queryclose en fermant les 5 userform (unload)

Voici le code qu'il y a sur les 5 userforms qui sont en cascade :

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

Dim rep As Long

If CloseMode = 0 Then

'message affiché

rep = MsgBox(prompt:=" Data entered in this form will be lost.", Title:="We are leaving ?", Buttons:=vbYesNo + vbCritical)

'Clique oui>quitter

If rep <> vbYes Then Cancel = True

'vidage mémoire

Unload UserForm2

Unload UserForm5

Unload UserForm4

Unload UserForm3

Unload UserForm1

End If

End If

End Sub

Seulement les userform ne s'unload pas tous. (généralement, suivant où je clique ; c'est l'userform 1 où 2 qui ne se vident pas)

Du coup j'ai essayé de simplifier le fichier et les macros, pour vous présenter le problème, mais le soucis à disparut.

J'ai rajouter les 5 fonction unload (pour les 5 userform) avant l'apparition du premier Userform (commandé par un bouton sur le tableur. Mais le Userform 2 ne se vide toujours pas ...

Je sais que c'est pas évident de dépanner sans exemple, mais je ne peut pas vous transmettre le fichier tel quel ...

J'ai enlevé toutes mes variables déclaré en public en pensant que ça pouvait gêner la fermeture mais c'est pas ça...

Vous auriez des pistes de recherche ?

Merci beaucoup pour toutes pistes de réflexion...

PS même si je place Unload Userform2 en bout de course sur mon bouton suivant, l'Userform2 reste affiché avec les données qui devraient se vider

Le mieux c'est de se corriger tout seul ...