OVH Cloud OVH Cloud

Filtre automatique et feuille protégée

2 réponses
Avatar
ManBas
Bonjour,
Le besoin d'un filtre auto dans une feuille protégée me pose problème.
Je croyais disposer des 2 solutions suivantes:
- Dans le module ThisWorkbook :
Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True
Feuil1.Protect Contents:=True, UserInterfaceOnly:=True
End Sub
... ne marche pas: filtre automatique reste inaccessible dans le menu
déroulant???

- Dans Outil, Protection, Protéger la feuille, Autoriser tous les
utilisateurs
à :
et cocher "Utiliser le filtre automatique".
(A condition d'avoir défini le filtre avant de protéger la feuille, bien
sûr)
... mais dans protection/protéger la feuille il n'y a pas de rubrique
"autoriser" ???

Qu'est-ce que je n'ai pas compris dans ces solutions?
Merci d'avance +++.

2 réponses

Avatar
LSteph
Bonjour Manbas,
Tu dois mettre le filtre avant de protèger.

Si ta version est récente quand tu protèges tu peux autoriser
différentes actions pour l'utilisateur, dont utilisation du filtre.

lSteph

"ManBas" a écrit dans le message de news:

Bonjour,
Le besoin d'un filtre auto dans une feuille protégée me pose problème.
Je croyais disposer des 2 solutions suivantes:
- Dans le module ThisWorkbook :
Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True
Feuil1.Protect Contents:=True, UserInterfaceOnly:=True
End Sub
... ne marche pas: filtre automatique reste inaccessible dans le menu
déroulant???

- Dans Outil, Protection, Protéger la feuille, Autoriser tous les
utilisateurs
à :
et cocher "Utiliser le filtre automatique".
(A condition d'avoir défini le filtre avant de protéger la feuille, bien
sûr)
... mais dans protection/protéger la feuille il n'y a pas de rubrique
"autoriser" ???

Qu'est-ce que je n'ai pas compris dans ces solutions?
Merci d'avance +++.



Avatar
LSteph
...en VB: allowfiltering=true

lSteph

"ManBas" a écrit dans le message de news:

Bonjour,
Le besoin d'un filtre auto dans une feuille protégée me pose problème.
Je croyais disposer des 2 solutions suivantes:
- Dans le module ThisWorkbook :
Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True
Feuil1.Protect Contents:=True, UserInterfaceOnly:=True
End Sub
... ne marche pas: filtre automatique reste inaccessible dans le menu
déroulant???

- Dans Outil, Protection, Protéger la feuille, Autoriser tous les
utilisateurs
à :
et cocher "Utiliser le filtre automatique".
(A condition d'avoir défini le filtre avant de protéger la feuille, bien
sûr)
... mais dans protection/protéger la feuille il n'y a pas de rubrique
"autoriser" ???

Qu'est-ce que je n'ai pas compris dans ces solutions?
Merci d'avance +++.