Protection de la feuille ET filtre automatique

[Laurent CECCARELLI]

Bonjour,
J'ai un gros soucis :
J'ai activé les filtres automatiques par colonne.
Je protège les données contre l'écriture.
Résultat : Les filtres automatiques sont inopérants !!
Que faire ?
Merci
Laurent
laurentceccarelli@free.fr

 

[Pascal76]

Salut Laurent

Je pense que ce code devrait faire l'affaire

Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True

Feuil1.Protect Contents:=True, UserInterfaceOnly:=True
End Sub

J'espère que cela répond à ta question

Pascal

 

[Laurent CECCARELLI]

ÇA MARCHE !!

Un grand bravo et un grand merci à Pascal !
Ça fonctionne !
Laurent