Fermeture userform lorsque on change de feuille

Résolu
Utilisateur anonyme -  
 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 17270 Date d'inscription   Statut Membre Dernière intervention   1 713
 
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
 
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