Moi j'ai une base de données de 1000 lignes environ
j'ai mis un filtre automatique sur cette base
mais avec ce filtre on ne peut plus protéger les données
(ces données sont en lecture seules)
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
isabelle
bonjour ,
voici une solution donné par AV,
Mettre ce code dans le ThisWorbook
Private Sub Workbook_Open() With Sheets("Feuil1") .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End With End Sub
puis appliquer le filtre sur "Feuil1" Enregistret/Fermer/réouvrir le classeur
isabelle
Bonne année à tous !!!
Moi j'ai une base de données de 1000 lignes environ j'ai mis un filtre automatique sur cette base mais avec ce filtre on ne peut plus protéger les données (ces données sont en lecture seules)
bonjour j@mes,
voici une solution donné par AV,
Mettre ce code dans le ThisWorbook
Private Sub Workbook_Open()
With Sheets("Feuil1")
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
End With
End Sub
puis appliquer le filtre sur "Feuil1"
Enregistret/Fermer/réouvrir le classeur
isabelle
Bonne année à tous !!!
Moi j'ai une base de données de 1000 lignes environ
j'ai mis un filtre automatique sur cette base
mais avec ce filtre on ne peut plus protéger les données
(ces données sont en lecture seules)
Private Sub Workbook_Open() With Sheets("Feuil1") .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End With End Sub
puis appliquer le filtre sur "Feuil1" Enregistret/Fermer/réouvrir le classeur
isabelle
Bonne année à tous !!!
Moi j'ai une base de données de 1000 lignes environ j'ai mis un filtre automatique sur cette base mais avec ce filtre on ne peut plus protéger les données (ces données sont en lecture seules)
j
je vais essayer ça. Merci à toi et encore bonne année "isabelle" a écrit dans le message de news:
bonjour ,
voici une solution donné par AV,
Mettre ce code dans le ThisWorbook
Private Sub Workbook_Open() With Sheets("Feuil1") .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End With End Sub
puis appliquer le filtre sur "Feuil1" Enregistret/Fermer/réouvrir le classeur
isabelle
Bonne année à tous !!!
Moi j'ai une base de données de 1000 lignes environ j'ai mis un filtre automatique sur cette base mais avec ce filtre on ne peut plus protéger les données (ces données sont en lecture seules)
je vais essayer ça.
Merci à toi et encore bonne année
"isabelle" <as.isabellevIE@videotron.ca> a écrit dans le message de news:
3FF46026.25960CE7@videotron.ca...
bonjour j@mes,
voici une solution donné par AV,
Mettre ce code dans le ThisWorbook
Private Sub Workbook_Open()
With Sheets("Feuil1")
.EnableAutoFilter = True
.Protect Contents:=True, UserInterfaceOnly:=True
End With
End Sub
puis appliquer le filtre sur "Feuil1"
Enregistret/Fermer/réouvrir le classeur
isabelle
Bonne année à tous !!!
Moi j'ai une base de données de 1000 lignes environ
j'ai mis un filtre automatique sur cette base
mais avec ce filtre on ne peut plus protéger les données
(ces données sont en lecture seules)
je vais essayer ça. Merci à toi et encore bonne année "isabelle" a écrit dans le message de news:
bonjour ,
voici une solution donné par AV,
Mettre ce code dans le ThisWorbook
Private Sub Workbook_Open() With Sheets("Feuil1") .EnableAutoFilter = True .Protect Contents:=True, UserInterfaceOnly:=True End With End Sub
puis appliquer le filtre sur "Feuil1" Enregistret/Fermer/réouvrir le classeur
isabelle
Bonne année à tous !!!
Moi j'ai une base de données de 1000 lignes environ j'ai mis un filtre automatique sur cette base mais avec ce filtre on ne peut plus protéger les données (ces données sont en lecture seules)
