Fermeture userform lorsque on change de feuille

Résolu/Fermé
Utilisateur anonyme - 25 mai 2020 à 00:09
 Utilisateur anonyme - 25 mai 2020 à 10:22
Bonsoir, le forum
Les deux macros de feuille_2 ci-dessous sont créer pour fermer un USERFORM_2
lorsque on change de feuille (par exemple en cliquant sur autre feuille)
Et dans le cas contraire rouvrir l'USRFORM lorsqu'on est de retour sur la feuille_2 sur
laquelle il doit s'ouvrir...

Mais quand l'USERFORM_2 est fermé par sa croix rouge, et on sélectionne autre feuille, la ça coince. Il y a un bug sur la ligne du code « Unload Userform_2 »
que dois je ajouter pour remédier se problème.

Private Sub Worksheet_Activate()
UserForm_2.Show
End Sub

Private Sub Worksheet_Deactivate()
Unload UserForm_2
End Sub

Merci pour vos aides.

2 réponses

f894009 Messages postés 17200 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 11 septembre 2024 1 708
Modifié le 25 mai 2020 à 07:03
Bonjour,
une facon de faire:

Enlevez le code dans vos vba feuille

Dans un module:
'Variables public
Public UF_Unl As Boolean


Dans ThisWorkbook:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    UserForm1.Show vbModeless
End Sub

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
    If Not UF_Unl Then
        Unload UserForm1
    End If
End Sub


Mais, pourquoi fermez vous l'UF pour l'ouvrir?
1
Utilisateur anonyme
25 mai 2020 à 10:22
Bonjour le forum
Merci bien f894009

Cet userform est conçu pour traiter les données seulement sur la feuille « base » (base nomination sur mon projet) et au retour à une feuille qui se nomme accueil alors pas besoin de ce userform.
0