BVjr Boudoula,Ashaar et le Forum,
tu peux essayer ceci aussi:
sub selectfeuil
Dim i
i = Sheets.Count
Sheets(i - 1).Activate
End Sub
à condition que ta feuille active à l'ouverture soit la dernière de celles existantes.
pour adapter,tu peux modifier le nombre après le '-'.
Bonne journée à tous