Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

utiliser le filtre automatique dans feuille protegée Excel

6 réponses
Avatar
Albanos
Comment utiliser le filtre automatique dans une feuille protegée Excel.
j'ai coché les cases pour autoriser le tri et le filtre .

merci

6 réponses

Avatar
Patrick BASTARD
Bonjour à toi aussi, *Albanos*

Quelle version ?




Comment utiliser le filtre automatique dans une feuille protegée
Excel. j'ai coché les cases pour autoriser le tri et le filtre .

merci


Avatar
michdenis
Bonjour Albanos,

Dans le ThisWorkbook de ton classeur :

Si la feuille où le filtre doit avoir lieu est la "Feuil1".
Ce code s'exécute à l'ouverture d'Excel.
Les boutons de ton filtre automatique doivent déjà être présents sur ta plage à filtrer
"toto" est utilisé comme mot de passe dans l'exemple

'--------------------
Private Sub Workbook_Open()

With Worksheets("Feuil1")
.EnableAutoFilter = True
Feuil1.Protect "toto", True, True, True, True
End With
End Sub
'--------------------


Salutations!


"Albanos" a écrit dans le message de news:
Comment utiliser le filtre automatique dans une feuille protegée Excel.
j'ai coché les cases pour autoriser le tri et le filtre .

merci
Avatar
Albanos
version 2003



Bonjour à toi aussi, *Albanos*

Quelle version ?




Comment utiliser le filtre automatique dans une feuille protegée
Excel. j'ai coché les cases pour autoriser le tri et le filtre .

merci







Avatar
Albanos
merci , le filtre est à utiliser sur toutes les feuilles d'un classeur ( 26)
j'ai oublié : une seule colonne de la feuille contenant des formules qui est
verrouillée et masquée.les autres colonnes sont pour la saisie .


Bonjour Albanos,

Dans le ThisWorkbook de ton classeur :

Si la feuille où le filtre doit avoir lieu est la "Feuil1".
Ce code s'exécute à l'ouverture d'Excel.
Les boutons de ton filtre automatique doivent déjà être présents sur ta plage à filtrer
"toto" est utilisé comme mot de passe dans l'exemple

'--------------------
Private Sub Workbook_Open()

With Worksheets("Feuil1")
.EnableAutoFilter = True
Feuil1.Protect "toto", True, True, True, True
End With
End Sub
'--------------------


Salutations!


"Albanos" a écrit dans le message de news:
Comment utiliser le filtre automatique dans une feuille protegée Excel.
j'ai coché les cases pour autoriser le tri et le filtre .

merci





Avatar
michdenis
Pour que ceci fonctionne, tu dois déprotéger tes feuilles.

Comme cette macro s'exécute à l'ouverture d'un classeur,
Ferme ton classeur et rouvre-le.

Il ne faut pas oublier que les boutons du filtre auto. de chacune
des feuilles où tu veux utiliser le filtre automatique doivent être
visibles avant d'exécuter cette procédure.

'--------------------
Private Sub Workbook_Open()

For each Sh in Worksheets
Sh.EnableAutoFilter = True
Sh..Protect "toto", True, True, True, True
End With
End Sub
'--------------------


Salutations!



"Albanos" a écrit dans le message de news:
merci , le filtre est à utiliser sur toutes les feuilles d'un classeur ( 26)
j'ai oublié : une seule colonne de la feuille contenant des formules qui est
verrouillée et masquée.les autres colonnes sont pour la saisie .


Bonjour Albanos,

Dans le ThisWorkbook de ton classeur :

Si la feuille où le filtre doit avoir lieu est la "Feuil1".
Ce code s'exécute à l'ouverture d'Excel.
Les boutons de ton filtre automatique doivent déjà être présents sur ta plage à filtrer
"toto" est utilisé comme mot de passe dans l'exemple

'--------------------
Private Sub Workbook_Open()

With Worksheets("Feuil1")
.EnableAutoFilter = True
Feuil1.Protect "toto", True, True, True, True
End With
End Sub
'--------------------


Salutations!


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

Comment utiliser le filtre automatique dans une feuille protegée Excel.
j'ai coché les cases pour autoriser le tri et le filtre .

merci





Avatar
Albanos
merci à toi
je vais l'essayer


Pour que ceci fonctionne, tu dois déprotéger tes feuilles.

Comme cette macro s'exécute à l'ouverture d'un classeur,
Ferme ton classeur et rouvre-le.

Il ne faut pas oublier que les boutons du filtre auto. de chacune
des feuilles où tu veux utiliser le filtre automatique doivent être
visibles avant d'exécuter cette procédure.

'--------------------
Private Sub Workbook_Open()

For each Sh in Worksheets
Sh.EnableAutoFilter = True
Sh..Protect "toto", True, True, True, True
End With
End Sub
'--------------------


Salutations!



"Albanos" a écrit dans le message de news:
merci , le filtre est à utiliser sur toutes les feuilles d'un classeur ( 26)
j'ai oublié : une seule colonne de la feuille contenant des formules qui est
verrouillée et masquée.les autres colonnes sont pour la saisie .


Bonjour Albanos,

Dans le ThisWorkbook de ton classeur :

Si la feuille où le filtre doit avoir lieu est la "Feuil1".
Ce code s'exécute à l'ouverture d'Excel.
Les boutons de ton filtre automatique doivent déjà être présents sur ta plage à filtrer
"toto" est utilisé comme mot de passe dans l'exemple

'--------------------
Private Sub Workbook_Open()

With Worksheets("Feuil1")
.EnableAutoFilter = True
Feuil1.Protect "toto", True, True, True, True
End With
End Sub
'--------------------


Salutations!


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

Comment utiliser le filtre automatique dans une feuille protegée Excel.
j'ai coché les cases pour autoriser le tri et le filtre .

merci