Protection sur Filtre

[Glop]

Bonsoir tout le monde.
Il y a trois jours j'ai demandé un renseignement pour utiliser les filtres avec protection de la feuille. ça fonctionne car j'ai Excel 2003, mais au boulot j'ai Excel 2000 et là ça pêche , je n'ai pas de fenêtre qui me propose differentes options pour le protection de la feuille. Auriez-vous une astuce pour mon problème. Merci par avance.

 

[Marc_du_78]

Bonsoir Glop,

Je te propose un essai avec ce qui suit, en espérant que tu arrivera à tes fins :
Dans Thisworkbook

Private Sub Workbook_Open()
With Worksheets('Feuil1')
.EnableAutoFilter = True
.Protect UserInterfaceOnly:=True
End With
End Sub

Filtres automatiques actifs feuille vérouillée

Private Sub Workbook_Open()
With Worksheets('Feuil1')
.EnableAutoFilter = True
.Protect UserInterfaceOnly:=True
End With
End Sub

reviens a mettre
With Worksheets('Feuil1')
.EnableAutoFilter = True
.Protect UserInterfaceOnly:=True
End With

dans ThisWorkbook
Dans la list '(general') tu choisi Workbook
Dans la list '(declaration') tu choisi Open

Pour utiliser le filtre sur une feuille protégée :
Dans le module ThisWorkbook :
Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True
Feuil1.Protect Contents:=True, UserInterfaceOnly:=True
End Sub