Autoriser l'utilisation d'autofilter lorsque la macro re-protege la feuille

[larnomx]

Bonjour a tous.

Dans un premier temps, je tiens a m'excuser par rapport aux accents (clavier americain non configure pour une utilisation "a la francaise").

Alors, le probleme qui me perturbe depuis quelques temps est le suivant:

Sur ma feuille, je souhaite utiliser des "autofilter" afin de faciliter la recherche dans le document mais je veux egalement proteger mon classeur.
J'ai ajoute un bouton "reset" afin de reinitialiser tous les autofilter a la fin de chaque recherche.
Probleme, lorsque je clique sur le bouton reset, ca fonctionne mais lorsque la macro re-protege la feuille, elle n'autorise plus l'utilisation des autofilter (ma macro de-protege ma feuille pour autoriser l'utilisation du bouton reset puis la reprotege).

Ma macro est la suivante:

Private Sub CommandButton1_Click()
ActiveSheet.Unprotect "a"
If ActiveSheet.FilterMode = True Then
ActiveSheet.ShowAllData
End If
ActiveSheet.Protect "a", True, True, True
End Sub


Autre solution de secours serait de rattacher mon bouton reset a une cellule et de "deverouiller" cette cellule...


Merci a vous.

Arnold.

 

[kjin]

Re : Autoriser l'utilisation d'autofilter lorsque la macro re-protege la feuille

Bonsoir,
Utilises la propriété EnableAutoFilter de la feuille avant protection
A+
kjin