Bonsoir à tous,
Je souhaiterais forcer le fonctionnement des filtres malgrés la
protection de la feuille (donc sans avoir à ôter la protection)...
Merci d'avance et encore merci papou pour ta réponse de tout à l'heure :o)
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
Patrick BASTARD
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
-- Bien cordialement, P. Bastard
Bonsoir à tous, Je souhaiterais forcer le fonctionnement des filtres malgrés la protection de la feuille (donc sans avoir à ôter la protection)... Merci d'avance et encore merci papou pour ta réponse de tout à l'heure :o)
Bonjour, *F@brice*
J'ai lu ton post 42163FCD.3040306@tele2.fr
avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ?
Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille
protégée, dans les options au moment de la protection.
--
Bien cordialement,
P. Bastard
Bonsoir à tous,
Je souhaiterais forcer le fonctionnement des filtres malgrés la
protection de la feuille (donc sans avoir à ôter la protection)...
Merci d'avance et encore merci papou pour ta réponse de tout à
l'heure :o)
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
-- Bien cordialement, P. Bastard
Bonsoir à tous, Je souhaiterais forcer le fonctionnement des filtres malgrés la protection de la feuille (donc sans avoir à ôter la protection)... Merci d'avance et encore merci papou pour ta réponse de tout à l'heure :o)
F
bonsoir, j'utilise la version 97 merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
bonsoir, j'utilise la version 97
merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, *F@brice*
J'ai lu ton post 42163FCD.3040306@tele2.fr
avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ?
Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille
protégée, dans les options au moment de la protection.
bonsoir, j'utilise la version 97 merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
ChrisV
Bonjour Fabrice,
Dans le module ThisWorkbook : (en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open() Feuil1.EnableAutoFilter = True Feuil1.Protect Contents:=True, UserInterfaceOnly:=True End Sub
ChrisV
"" a écrit dans le message de news:
bonsoir, j'utilise la version 97 merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
Bonjour Fabrice,
Dans le module ThisWorkbook :
(en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True
Feuil1.Protect Contents:=True, UserInterfaceOnly:=True
End Sub
ChrisV
"F@brice" <moralesfabrice@tele2.fr> a écrit dans le message de news:
42164544.2030102@tele2.fr...
bonsoir, j'utilise la version 97
merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, *F@brice*
J'ai lu ton post 42163FCD.3040306@tele2.fr
avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ?
Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille
protégée, dans les options au moment de la protection.
Dans le module ThisWorkbook : (en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open() Feuil1.EnableAutoFilter = True Feuil1.Protect Contents:=True, UserInterfaceOnly:=True End Sub
ChrisV
"" a écrit dans le message de news:
bonsoir, j'utilise la version 97 merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
F
Je te remercie mais ça ne marche pas :o( mon onglet se nomme "Saisie" Je continue à me triturer les méninges....
ChrisV a écrit:
Bonjour Fabrice,
Dans le module ThisWorkbook : (en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open() Feuil1.EnableAutoFilter = True Feuil1.Protect Contents:=True, UserInterfaceOnly:=True End Sub
ChrisV
"" a écrit dans le message de news:
bonsoir, j'utilise la version 97 merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
Je te remercie mais ça ne marche pas :o(
mon onglet se nomme "Saisie"
Je continue à me triturer les méninges....
ChrisV a écrit:
Bonjour Fabrice,
Dans le module ThisWorkbook :
(en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True
Feuil1.Protect Contents:=True, UserInterfaceOnly:=True
End Sub
ChrisV
"F@brice" <moralesfabrice@tele2.fr> a écrit dans le message de news:
42164544.2030102@tele2.fr...
bonsoir, j'utilise la version 97
merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, *F@brice*
J'ai lu ton post 42163FCD.3040306@tele2.fr
avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ?
Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille
protégée, dans les options au moment de la protection.
Je te remercie mais ça ne marche pas :o( mon onglet se nomme "Saisie" Je continue à me triturer les méninges....
ChrisV a écrit:
Bonjour Fabrice,
Dans le module ThisWorkbook : (en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open() Feuil1.EnableAutoFilter = True Feuil1.Protect Contents:=True, UserInterfaceOnly:=True End Sub
ChrisV
"" a écrit dans le message de news:
bonsoir, j'utilise la version 97 merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
MichDenis
Bonjour Fabrice,
De cette manière tu pourras appliquer un filtre automatique sur la plage de données .
Prend soin de modifier le nom de ta feuille et de même que la référence de cellule de mon exemple où tu veux appliquer un filtre automatique.
Le principe... c'est que les boutons du filtre automatique doivent être présents sur la feuille avant de protéger la feuille.
Dans le thisworkbook de ton classeur ...
----------------------- Private Sub Workbook_Open()
Dim Sh As Worksheet Set Sh = Worksheets("Feuil1")
With Sh .Unprotect ' Mot de passe si nécessaire ... If .AutoFilterMode Then .Range("A1").AutoFilter .Range("A1").AutoFilter .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True Else .Range("A1").AutoFilter .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End If End With Set Sh = Nothing
End Sub -----------------------
Range("a1") = représente une cellule quelconque de la feuille appartenant à la plage de cellule où tu désires appliquer le filtre.
Salutations!
"" a écrit dans le message de news: Je te remercie mais ça ne marche pas :o( mon onglet se nomme "Saisie" Je continue à me triturer les méninges....
ChrisV a écrit:
Bonjour Fabrice,
Dans le module ThisWorkbook : (en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open() Feuil1.EnableAutoFilter = True Feuil1.Protect Contents:=True, UserInterfaceOnly:=True End Sub
ChrisV
"" a écrit dans le message de news:
bonsoir, j'utilise la version 97 merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
Bonjour Fabrice,
De cette manière tu pourras appliquer un filtre automatique
sur la plage de données .
Prend soin de modifier le nom de ta feuille et de même que
la référence de cellule de mon exemple où tu
veux appliquer un filtre automatique.
Le principe... c'est que les boutons du filtre automatique
doivent être présents sur la feuille avant de protéger la
feuille.
Dans le thisworkbook de ton classeur ...
-----------------------
Private Sub Workbook_Open()
Dim Sh As Worksheet
Set Sh = Worksheets("Feuil1")
With Sh
.Unprotect ' Mot de passe si nécessaire ...
If .AutoFilterMode Then
.Range("A1").AutoFilter
.Range("A1").AutoFilter
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
Else
.Range("A1").AutoFilter
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
End If
End With
Set Sh = Nothing
End Sub
-----------------------
Range("a1") = représente une cellule quelconque de la feuille
appartenant à la plage de cellule où tu désires appliquer le filtre.
Salutations!
"F@brice" <moralesfabrice@tele2.fr> a écrit dans le message de news: 421754FD.2040707@tele2.fr...
Je te remercie mais ça ne marche pas :o(
mon onglet se nomme "Saisie"
Je continue à me triturer les méninges....
ChrisV a écrit:
Bonjour Fabrice,
Dans le module ThisWorkbook :
(en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True
Feuil1.Protect Contents:=True, UserInterfaceOnly:=True
End Sub
ChrisV
"F@brice" <moralesfabrice@tele2.fr> a écrit dans le message de news:
42164544.2030102@tele2.fr...
bonsoir, j'utilise la version 97
merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, *F@brice*
J'ai lu ton post 42163FCD.3040306@tele2.fr
avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ?
Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille
protégée, dans les options au moment de la protection.
De cette manière tu pourras appliquer un filtre automatique sur la plage de données .
Prend soin de modifier le nom de ta feuille et de même que la référence de cellule de mon exemple où tu veux appliquer un filtre automatique.
Le principe... c'est que les boutons du filtre automatique doivent être présents sur la feuille avant de protéger la feuille.
Dans le thisworkbook de ton classeur ...
----------------------- Private Sub Workbook_Open()
Dim Sh As Worksheet Set Sh = Worksheets("Feuil1")
With Sh .Unprotect ' Mot de passe si nécessaire ... If .AutoFilterMode Then .Range("A1").AutoFilter .Range("A1").AutoFilter .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True Else .Range("A1").AutoFilter .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End If End With Set Sh = Nothing
End Sub -----------------------
Range("a1") = représente une cellule quelconque de la feuille appartenant à la plage de cellule où tu désires appliquer le filtre.
Salutations!
"" a écrit dans le message de news: Je te remercie mais ça ne marche pas :o( mon onglet se nomme "Saisie" Je continue à me triturer les méninges....
ChrisV a écrit:
Bonjour Fabrice,
Dans le module ThisWorkbook : (en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open() Feuil1.EnableAutoFilter = True Feuil1.Protect Contents:=True, UserInterfaceOnly:=True End Sub
ChrisV
"" a écrit dans le message de news:
bonsoir, j'utilise la version 97 merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
F
Merci à toi MichDenis, tu m'as mis sur la voie avec l'aide de ChrisV et de l'aide excel qui somme toute n'est parfois pas si mal ;o)
MichDenis a écrit:
Bonjour Fabrice,
De cette manière tu pourras appliquer un filtre automatique sur la plage de données .
Prend soin de modifier le nom de ta feuille et de même que la référence de cellule de mon exemple où tu veux appliquer un filtre automatique.
Le principe... c'est que les boutons du filtre automatique doivent être présents sur la feuille avant de protéger la feuille.
Dans le thisworkbook de ton classeur ...
----------------------- Private Sub Workbook_Open()
Dim Sh As Worksheet Set Sh = Worksheets("Feuil1")
With Sh .Unprotect ' Mot de passe si nécessaire ... If .AutoFilterMode Then .Range("A1").AutoFilter .Range("A1").AutoFilter .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True Else .Range("A1").AutoFilter .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End If End With Set Sh = Nothing
End Sub -----------------------
Range("a1") = représente une cellule quelconque de la feuille appartenant à la plage de cellule où tu désires appliquer le filtre.
Salutations!
"" a écrit dans le message de news: Je te remercie mais ça ne marche pas :o( mon onglet se nomme "Saisie" Je continue à me triturer les méninges....
ChrisV a écrit:
Bonjour Fabrice,
Dans le module ThisWorkbook : (en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open() Feuil1.EnableAutoFilter = True Feuil1.Protect Contents:=True, UserInterfaceOnly:=True End Sub
ChrisV
"" a écrit dans le message de news:
bonsoir, j'utilise la version 97 merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.
Merci à toi MichDenis, tu m'as mis sur la voie avec l'aide de ChrisV et
de l'aide excel qui somme toute n'est parfois pas si mal ;o)
MichDenis a écrit:
Bonjour Fabrice,
De cette manière tu pourras appliquer un filtre automatique
sur la plage de données .
Prend soin de modifier le nom de ta feuille et de même que
la référence de cellule de mon exemple où tu
veux appliquer un filtre automatique.
Le principe... c'est que les boutons du filtre automatique
doivent être présents sur la feuille avant de protéger la
feuille.
Dans le thisworkbook de ton classeur ...
-----------------------
Private Sub Workbook_Open()
Dim Sh As Worksheet
Set Sh = Worksheets("Feuil1")
With Sh
.Unprotect ' Mot de passe si nécessaire ...
If .AutoFilterMode Then
.Range("A1").AutoFilter
.Range("A1").AutoFilter
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
Else
.Range("A1").AutoFilter
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
End If
End With
Set Sh = Nothing
End Sub
-----------------------
Range("a1") = représente une cellule quelconque de la feuille
appartenant à la plage de cellule où tu désires appliquer le filtre.
Salutations!
"F@brice" <moralesfabrice@tele2.fr> a écrit dans le message de news: 421754FD.2040707@tele2.fr...
Je te remercie mais ça ne marche pas :o(
mon onglet se nomme "Saisie"
Je continue à me triturer les méninges....
ChrisV a écrit:
Bonjour Fabrice,
Dans le module ThisWorkbook :
(en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open()
Feuil1.EnableAutoFilter = True
Feuil1.Protect Contents:=True, UserInterfaceOnly:=True
End Sub
ChrisV
"F@brice" <moralesfabrice@tele2.fr> a écrit dans le message de news:
42164544.2030102@tele2.fr...
bonsoir, j'utilise la version 97
merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, *F@brice*
J'ai lu ton post 42163FCD.3040306@tele2.fr
avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ?
Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille
protégée, dans les options au moment de la protection.
Merci à toi MichDenis, tu m'as mis sur la voie avec l'aide de ChrisV et de l'aide excel qui somme toute n'est parfois pas si mal ;o)
MichDenis a écrit:
Bonjour Fabrice,
De cette manière tu pourras appliquer un filtre automatique sur la plage de données .
Prend soin de modifier le nom de ta feuille et de même que la référence de cellule de mon exemple où tu veux appliquer un filtre automatique.
Le principe... c'est que les boutons du filtre automatique doivent être présents sur la feuille avant de protéger la feuille.
Dans le thisworkbook de ton classeur ...
----------------------- Private Sub Workbook_Open()
Dim Sh As Worksheet Set Sh = Worksheets("Feuil1")
With Sh .Unprotect ' Mot de passe si nécessaire ... If .AutoFilterMode Then .Range("A1").AutoFilter .Range("A1").AutoFilter .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True Else .Range("A1").AutoFilter .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End If End With Set Sh = Nothing
End Sub -----------------------
Range("a1") = représente une cellule quelconque de la feuille appartenant à la plage de cellule où tu désires appliquer le filtre.
Salutations!
"" a écrit dans le message de news: Je te remercie mais ça ne marche pas :o( mon onglet se nomme "Saisie" Je continue à me triturer les méninges....
ChrisV a écrit:
Bonjour Fabrice,
Dans le module ThisWorkbook : (en supposant que le filtre soit appliqué sur l'onglet "Feuil1")
Private Sub Workbook_Open() Feuil1.EnableAutoFilter = True Feuil1.Protect Contents:=True, UserInterfaceOnly:=True End Sub
ChrisV
"" a écrit dans le message de news:
bonsoir, j'utilise la version 97 merci pour ton adide
Patrick BASTARD a écrit:
Bonjour, ** J'ai lu ton post avec le plus grand intéret :
Sur quelle version de Excel travailles-tu ? Sur Excel 2002, tu as possibilité d'autoriser le filtrage sur la feuille protégée, dans les options au moment de la protection.