Re: protection, filtre formulaire :"UserInterfaceOnly/EnableAutoFilter"
Salut Sniperts, le Forum
Il faut utiliser la méthode Protect avec la valeur de la Propriété "UserInterfaceOnly" à True, dans ce mode, la Propriété "EnableAutoFilter" peut avoir la valeur True.
Ce genre de méthode est "volatile", c'est à dire qu'il faut la ré-initialiser à chaque utilisation du classeur. En effet une fois le classeur fermé, l'argument UserInterfaceOnly se "volatilise". Cette propriété s'applique à chaque feuille de calcul et n'est enregistrée ni avec celle-ci, ni avec la session.
En conclusion, il faut faire exécuter le code de paramétrage de Protection d'une (ou plusieurs) feuille(s) avec une macro évènementielle. L'évènement WorkBook_Open semble bien convenir.
Code à placer dans le Private Module de ThisWorkBook
Private Sub Workbook_Open()
With Sheets("TaFeuille")
.EnableAutoFilter = True
.Protect Password:="TOTO", UserInterfaceOnly:=True
End With
End Sub
Voilà tu peux aussi consulter ces fils pour plus d'Infos :
Lien supprimé
Lien supprimé
Bonne Soirée
@+Thierry
