Bonjour
Dans une feuille protégée contenant des filtres automatiques, faut il
déprotéger temporairement pour remettre la sélection à "Tous" avec VBA ?
Cordialement
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
non, tu peux utiliser quelque chose comme :
à mettre dans le ThisWorkbook de ton classeur. '------------------------ Private Sub Workbook_Open() With Worksheets("Feuil1") .EnableAutoFilter = True .Protect "toto", True, True, True, True End With End Sub '------------------------
Toto = le mot de passe
P.S. Pour que cela fonctionne il faut que les "flèches" du filtre automatique soient déjà visibles sur la feuille avant de la protéger.
Comme cette macro s'exécute à l'ouverture du fichier, tu dois fermer le fichier et cela fonctionnera à sa réouverture.
"M41" a écrit dans le message de news: 48c015d6$0$908$ Bonjour Dans une feuille protégée contenant des filtres automatiques, faut il déprotéger temporairement pour remettre la sélection à "Tous" avec VBA ? Cordialement
M41
non, tu peux utiliser quelque chose comme :
à mettre dans le ThisWorkbook de ton classeur.
'------------------------
Private Sub Workbook_Open()
With Worksheets("Feuil1")
.EnableAutoFilter = True
.Protect "toto", True, True, True, True
End With
End Sub
'------------------------
Toto = le mot de passe
P.S. Pour que cela fonctionne il faut que les "flèches"
du filtre automatique soient déjà visibles sur la feuille
avant de la protéger.
Comme cette macro s'exécute à l'ouverture du fichier, tu
dois fermer le fichier et cela fonctionnera à sa réouverture.
"M41" <boomerang.pro00@wanadoo.fr> a écrit dans le message de news:
48c015d6$0$908$ba4acef3@news.orange.fr...
Bonjour
Dans une feuille protégée contenant des filtres automatiques, faut il
déprotéger temporairement pour remettre la sélection à "Tous" avec VBA ?
Cordialement
à mettre dans le ThisWorkbook de ton classeur. '------------------------ Private Sub Workbook_Open() With Worksheets("Feuil1") .EnableAutoFilter = True .Protect "toto", True, True, True, True End With End Sub '------------------------
Toto = le mot de passe
P.S. Pour que cela fonctionne il faut que les "flèches" du filtre automatique soient déjà visibles sur la feuille avant de la protéger.
Comme cette macro s'exécute à l'ouverture du fichier, tu dois fermer le fichier et cela fonctionnera à sa réouverture.
"M41" a écrit dans le message de news: 48c015d6$0$908$ Bonjour Dans une feuille protégée contenant des filtres automatiques, faut il déprotéger temporairement pour remettre la sélection à "Tous" avec VBA ? Cordialement
M41
M41
Merci. Je vais essayer. c ordialement. M41
"michdenis" a écrit dans le message de news:
non, tu peux utiliser quelque chose comme :
à mettre dans le ThisWorkbook de ton classeur. '------------------------ Private Sub Workbook_Open() With Worksheets("Feuil1") .EnableAutoFilter = True .Protect "toto", True, True, True, True End With End Sub '------------------------
Toto = le mot de passe
P.S. Pour que cela fonctionne il faut que les "flèches" du filtre automatique soient déjà visibles sur la feuille avant de la protéger.
Comme cette macro s'exécute à l'ouverture du fichier, tu dois fermer le fichier et cela fonctionnera à sa réouverture.
"M41" a écrit dans le message de news: 48c015d6$0$908$ Bonjour Dans une feuille protégée contenant des filtres automatiques, faut il déprotéger temporairement pour remettre la sélection à "Tous" avec VBA ? Cordialement
M41
Merci. Je vais essayer. c ordialement. M41
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
eWTeiOrDJHA.4700@TK2MSFTNGP03.phx.gbl...
non, tu peux utiliser quelque chose comme :
à mettre dans le ThisWorkbook de ton classeur.
'------------------------
Private Sub Workbook_Open()
With Worksheets("Feuil1")
.EnableAutoFilter = True
.Protect "toto", True, True, True, True
End With
End Sub
'------------------------
Toto = le mot de passe
P.S. Pour que cela fonctionne il faut que les "flèches"
du filtre automatique soient déjà visibles sur la feuille
avant de la protéger.
Comme cette macro s'exécute à l'ouverture du fichier, tu
dois fermer le fichier et cela fonctionnera à sa réouverture.
"M41" <boomerang.pro00@wanadoo.fr> a écrit dans le message de news:
48c015d6$0$908$ba4acef3@news.orange.fr...
Bonjour
Dans une feuille protégée contenant des filtres automatiques, faut il
déprotéger temporairement pour remettre la sélection à "Tous" avec VBA ?
Cordialement
à mettre dans le ThisWorkbook de ton classeur. '------------------------ Private Sub Workbook_Open() With Worksheets("Feuil1") .EnableAutoFilter = True .Protect "toto", True, True, True, True End With End Sub '------------------------
Toto = le mot de passe
P.S. Pour que cela fonctionne il faut que les "flèches" du filtre automatique soient déjà visibles sur la feuille avant de la protéger.
Comme cette macro s'exécute à l'ouverture du fichier, tu dois fermer le fichier et cela fonctionnera à sa réouverture.
"M41" a écrit dans le message de news: 48c015d6$0$908$ Bonjour Dans une feuille protégée contenant des filtres automatiques, faut il déprotéger temporairement pour remettre la sélection à "Tous" avec VBA ? Cordialement