bonsoir,
il faut expliquer un fois que les macros peuvent fonctionner dans cette feuille protégée pendant une session complète de ce fichier, par example quand on ouvre le fichier.
Toute le reste de la session, les macros n'ont plus de problèmes avec la protection de cette feuille.
La dernière ligne avec exportasfixedformat, celle-là vous pouvez l'ajouter dans un autre macro, ici elle sert à rien.
Private Sub Workbook_Open()
With Worksheets("Feuil2")
.Unprotect "123"
.Protect "123", userinterfaceonly:=True 'les macros peuvent travailler dans cette feuilles protégée
End With
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ThisWorkbook.Path & Application.PathSeparator & "test_" & Format(Now, "yymmdd hhmmss")
End Sub