Bonjour le forum
J'ai un Userform que j'affiche quand j'ouvre mon classeur par ce code dans ThisWorkbook
Private Sub Workbook_Open()
With sheets("ADMINISTRATEUR")
.Activate
.Range("A1").Activate
End With
FRM_Gestion.Show
End Sub
et aussi par ce code quand je vais ouvrir la feuille "ADMINISTRATEUR" de ce classeur
Private Sub Worksheet_Activate()
FRM_Gestion.Show
End Sub
Donc quand je vais ouvrir une autre feuille de ce classeur, je voulais caché l'Userform , donc environ 15 fois.
avec ce code
Private Sub Worksheet_Activate()
FRM_Gestion.Hide
End Sub
Ma question est:
comment mettre un seul code pour que FRM.Gestion soit Hide quand je quitte la feuille "ADMINISTRATEUR"
je me suis dirigé vers ce code que j'ai mis dans ThisWorkbook
Private sub Sheet.ListObjects_Activate()
Dim i As Integer
Application.ScreenUpdating = False
For i = 3 To sheets.Count
With sheets(i)
FRM_Gestion.Hide
End With
Next
Application.ScreenUpdating = True
End Sub
Mais cela ne fonctionne pas
Merci de vos propositions .