ok j'ai mis ça en cherchant un peu sur ce forum et pour le moment le message d'erreur à disparu.
With Sheets(' données en cours')
.EnableAutoFilter = True
.Protect 'motdepasse', UserInterfaceOnly:=True
mais je saurais seulement lundi si ça marche sous excel97.
En tout cas sous excel 2003 ça marche sans avoir cocher laisser filtre dans la protection, j'ai donc bon espoir.
merci à tous