Fermeture d'UserForm

Résolu
Rémi -  
 Rémi -
Bonjour,

J'ai créé un UserForm ("Personnels") avec différents boutons permettant l'accès à d'autres UserForm ("Recherche", "CMA", "Accès_tableau", etc).

Lors d'un clic sur un de ces boutons, l'UserForm actuel se ferme et le suivant s'ouvre comme prévu.
Mais lors d'un clic sur la croix pour le fermer, j'aimerai retourner à l'UserForm "Personnels" tout en fermant l'autre. Sauf que "Personnels" s'ouvre correctement, mais celui fermé reste ouvert derrière, créant une erreur si on essaie à nouveau d'y accéder car il est déjà ouvert.

J'ai essayé différentes lignes :

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If CloseMode = 0 Then Cancel = False
    Unload Me
    Personnel.Show
End Sub


ou


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


Voire même


Private Sub UserForm_Activate()     'Activation UserForm Personnel

Unload CMA
Unload parametres
Unload Accès_tableau
Unload Crea_CMA
Unload Recherche

[...]

End sub


Mais rien n'y fait. Je commence à être à court d'idées.

D'avance, merci.
A voir également:

3 réponses

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

Aller dans les propriétés de chaque UserForm et mettre ShowModal à False
0
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Bonjour,

Un exemple :
https://www.cjoint.com/c/FKen4QLf7RY
0
Rémi
 
Merci beaucoup, ça fonctionne nickel !
0