Bon, j'ai trouvé la solution.
Il fallait dans le ThisWorkbook mettre le code
Private Sub Workbook_Open()
Worksheets("Feuille de présence").Select 'sélectionne l'onglet "documents" à l'ouverture du classeur
UserForm1.Show 0 'mode d'affichage non modal
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name <> Worksheets("Feuille de présence").Name Then Unload UserForm1
If Sh.Name = Worksheets("Feuille de présence").Name Then UserForm1.Show 0 'mode d'affichage non modal
End Sub
Merci encore pour tous ceux qui prennent la peine d'aider.
A bientôt pour de nouvelles demandes