protéger que 2 lignes dans feuilles avec filtres (pour AV)
2 réponses
laurent colledani
bonpour
AV nous a donné une bonne solution pour protéger une feuille avec filtres
avec excel 2000.
Private Sub Workbook_Open()
With Sheets("suivi délai satisfaction")
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
End With
End Sub
cependant cette solution protège toutes les lignes de la feuille. or j'ai
besoin d'autoriser les utilisateurs à pouvoir supprimer toutes le lignes sauf
les 2 premières. (c'est sur la 2eme que j'ai mis les filtres).
comment faire pour protéger que les 2 premières lignes
(row(1:2).protect: = true .....?????excusez moi pour mon mauvais vba!!!)
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
LSteph
Bonjour Laurent, regardes ma proposition à Congelator du 21/01 19:03 cibler le target avec intersect 'lSteph
"laurent colledani" a écrit dans le message de news:
bonpour
AV nous a donné une bonne solution pour protéger une feuille avec filtres avec excel 2000.
Private Sub Workbook_Open() With Sheets("suivi délai satisfaction") .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End With End Sub
cependant cette solution protège toutes les lignes de la feuille. or j'ai besoin d'autoriser les utilisateurs à pouvoir supprimer toutes le lignes sauf les 2 premières. (c'est sur la 2eme que j'ai mis les filtres). comment faire pour protéger que les 2 premières lignes (row(1:2).protect: = true .....?????excusez moi pour mon mauvais vba!!!)
cordialement
Bonjour Laurent,
regardes ma proposition à Congelator du 21/01 19:03
cibler le target avec intersect
'lSteph
"laurent colledani" <laurentcolledani@discussions.microsoft.com> a écrit
dans le message de news:
B05BF730-1D83-4B2F-A658-16CD6707D22A@microsoft.com...
bonpour
AV nous a donné une bonne solution pour protéger une feuille avec filtres
avec excel 2000.
Private Sub Workbook_Open()
With Sheets("suivi délai satisfaction")
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
End With
End Sub
cependant cette solution protège toutes les lignes de la feuille. or j'ai
besoin d'autoriser les utilisateurs à pouvoir supprimer toutes le lignes
sauf
les 2 premières. (c'est sur la 2eme que j'ai mis les filtres).
comment faire pour protéger que les 2 premières lignes
(row(1:2).protect: = true .....?????excusez moi pour mon mauvais vba!!!)
Bonjour Laurent, regardes ma proposition à Congelator du 21/01 19:03 cibler le target avec intersect 'lSteph
"laurent colledani" a écrit dans le message de news:
bonpour
AV nous a donné une bonne solution pour protéger une feuille avec filtres avec excel 2000.
Private Sub Workbook_Open() With Sheets("suivi délai satisfaction") .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End With End Sub
cependant cette solution protège toutes les lignes de la feuille. or j'ai besoin d'autoriser les utilisateurs à pouvoir supprimer toutes le lignes sauf les 2 premières. (c'est sur la 2eme que j'ai mis les filtres). comment faire pour protéger que les 2 premières lignes (row(1:2).protect: = true .....?????excusez moi pour mon mauvais vba!!!)
cordialement
laurent colledani
merci le steph, ta solution fonctionne laurent
Bonjour Laurent, regardes ma proposition à Congelator du 21/01 19:03 cibler le target avec intersect 'lSteph
"laurent colledani" a écrit dans le message de news:
bonpour
AV nous a donné une bonne solution pour protéger une feuille avec filtres avec excel 2000.
Private Sub Workbook_Open() With Sheets("suivi délai satisfaction") .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End With End Sub
cependant cette solution protège toutes les lignes de la feuille. or j'ai besoin d'autoriser les utilisateurs à pouvoir supprimer toutes le lignes sauf les 2 premières. (c'est sur la 2eme que j'ai mis les filtres). comment faire pour protéger que les 2 premières lignes (row(1:2).protect: = true .....?????excusez moi pour mon mauvais vba!!!)
cordialement
merci le steph, ta solution fonctionne
laurent
Bonjour Laurent,
regardes ma proposition à Congelator du 21/01 19:03
cibler le target avec intersect
'lSteph
"laurent colledani" <laurentcolledani@discussions.microsoft.com> a écrit
dans le message de news:
B05BF730-1D83-4B2F-A658-16CD6707D22A@microsoft.com...
bonpour
AV nous a donné une bonne solution pour protéger une feuille avec filtres
avec excel 2000.
Private Sub Workbook_Open()
With Sheets("suivi délai satisfaction")
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
End With
End Sub
cependant cette solution protège toutes les lignes de la feuille. or j'ai
besoin d'autoriser les utilisateurs à pouvoir supprimer toutes le lignes
sauf
les 2 premières. (c'est sur la 2eme que j'ai mis les filtres).
comment faire pour protéger que les 2 premières lignes
(row(1:2).protect: = true .....?????excusez moi pour mon mauvais vba!!!)
Bonjour Laurent, regardes ma proposition à Congelator du 21/01 19:03 cibler le target avec intersect 'lSteph
"laurent colledani" a écrit dans le message de news:
bonpour
AV nous a donné une bonne solution pour protéger une feuille avec filtres avec excel 2000.
Private Sub Workbook_Open() With Sheets("suivi délai satisfaction") .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End With End Sub
cependant cette solution protège toutes les lignes de la feuille. or j'ai besoin d'autoriser les utilisateurs à pouvoir supprimer toutes le lignes sauf les 2 premières. (c'est sur la 2eme que j'ai mis les filtres). comment faire pour protéger que les 2 premières lignes (row(1:2).protect: = true .....?????excusez moi pour mon mauvais vba!!!)