Excel : feuille protégée et affichage des filtres

kimenbo kimenbo
608 contributions
Membre depuis le 24/02/2002
Envoyé le 04/07/2003 à 17:41


Bonjour,

Dans une feuille Excel protégée, je dois pouvoir effectuer des \"filtres automatiques\" mais pouvoir également \"afficher tout\" sans avoir à déprotéger ma feuille.
J\'ai bien une formule, mais elle ne fonctionne pas :

Private Sub Worksheet_Activate()
With ActiveSheet
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
End With
End Sub

Quelqu\'un peut-il m\'aider sur ce sujet ????

Merci pour vos réponses...
Kimenbo
Tout le monde sait quelque chose, personne ne sait tout.
oups oups
143 contributions
Membre depuis le 19/07/2001
Envoyé le 15/07/2003 à 15:21


Bonjour,

je viens d\'avoir le même pb et cette formule fonctionne, testée à l\'instant :

- d\'abord déprotéger la feuille
- mettre les filtres désirés
- alt+F11 (pour accéder à VBA)
- dans le module ThisWorkbook :

Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True

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

- remettre la protection

et ça fonctionne ! [:D]

kimenbo kimenbo
608 contributions
Membre depuis le 24/02/2002
Envoyé le 15/07/2003 à 16:46


OK... Merci bien, je la mets de côté car j'ai résolu le pb de l'utilisateur par une autre parade :

je lui ai créé une macro lui permettant d'afficher tout avec un bouton... Il est content !!! et moi aussi... !!!

Encore merci !
Kimenbo
Tout le monde sait quelque chose, personne ne sait tout.

Discussion trop ancienne

Cette discussion a été automatiquement fermée car elle n'a plus reçue de nouveau message depuis trop longtemps.

Nous vous suggérons de créer un nouveau message

« Retour sur la liste des messages de ce forum