Signaler

Filtre automatique sur feuille protégée [Résolu]

Posez votre question melle.brigitte 30Messages postés lundi 8 juillet 2013Date d'inscription 9 juin 2017 Dernière intervention - Dernière réponse le 9 juin 2017 à 11:47 par melle.brigitte
Bonjour,

Je suis sous Excel 2000.

Je souhaiterais savoir comment avoir la possibilité d'utiliser le filtre automatique dans une feuille protégée.

J'ai bien sûr déverrouillé l'ensemble des entêtes de colonnes avant la protection de la feuille mais cela ne fonctionne pas.

Merci de votre aide.


Afficher la suite 
Utile
+1
plus moins
Bonjour
lors de la protection de la feuille, dans la fenêtre d'option qui s'affiche:
chercher la ligne "utiliser les filtres automatiques"
et cochez la
crdlmnt

Cette réponse vous a-t-elle aidé ?  
Donnez votre avis
Utile
+0
plus moins
Bonjour,

Merci pour votre réponse, seulement dans la fenêtre d'option qui s'affiche, j'ai uniquement 3 possibilités (à cocher) :
- Contenu
- Objets
- Scénarios

Laquelle correspond au filtre automatique ?
Vaucluse 20111Messages postés lundi 23 juillet 2007Date d'inscription ContributeurStatut 9 août 2017 Dernière intervention - 9 juin 2017 à 09:20
... me rappelle plus!Je ne sais donc même pas si cette option existait en 2000?

suffit de tester une par une, sans être sur toutefois que l'option soit incluse en 2000
crdlmnt
Répondre
melle.brigitte 30Messages postés lundi 8 juillet 2013Date d'inscription 9 juin 2017 Dernière intervention - 9 juin 2017 à 09:47
Il n'existe donc vraiment pas de solution pour Excel 2000 ?
Répondre
Vaucluse 20111Messages postés lundi 23 juillet 2007Date d'inscription ContributeurStatut 9 août 2017 Dernière intervention - 9 juin 2017 à 10:48
en farfouillant sur le net, j'ai trouvé ça, je ne sais pas ce que ça vaut sur Excel 2000

Private Sub Workbook_Open()
With Sheets("Feuil1")
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
End With
End Sub


texte à coller dans le menu visual basic, dossier "this workbook" en plaçant le nom de la feuille à protéger entre guillemets à la place de Feuil1
(je ne connais plus les commandes qui affichent VBA en 2000, aujourd'hui, c'est touche Alt + touche F11)

A part ça, je ne vois rien d'autre

crdlmnt
Répondre
melle.brigitte 30Messages postés lundi 8 juillet 2013Date d'inscription 9 juin 2017 Dernière intervention - 9 juin 2017 à 11:47
En effet, cela fonctionne.

Pour plus de simplicité, j'ai donc saisi le code de cette manière :
Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True
Feuil1.Protect Contents:=True, UserInterfaceOnly:=True
End Sub

Ensuite, j'ai réactivé la protection de la feuille via le menu Outils en insérant un mot de passe.

Merci pour votre aide !
Répondre
Donnez votre avis

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !