je voudrais vérrouiller une plage de cellules (même ligne)si le contenu
d'une cellule change. La cellule en question se trouve dans la colonne K et
je voudrais vérrouiller toutes les cellules de la ligne concernée de la
colonne A à la colonne K
j'ai tapé le code suivant mais rien ne se produit
Private Sub worksheet_change(ByVal target As Range)
If target.Column = 11 Then target.Offset(0, -10).Locked = True
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
anonymousA
bonjour,
With Target If .Column = 11 Then .Parent.Unprotect "motdepasse" Range(.Offset(0, -10), .Offset(0, 0)).Locked = True .Parent.Protect "motdepasse" End If End With
A+
Bonjour à tous,
je voudrais vérrouiller une plage de cellules (même ligne)si le contenu d'une cellule change. La cellule en question se trouve dans la colonne K et je voudrais vérrouiller toutes les cellules de la ligne concernée de la colonne A à la colonne K
j'ai tapé le code suivant mais rien ne se produit
Private Sub worksheet_change(ByVal target As Range)
If target.Column = 11 Then target.Offset(0, -10).Locked = True
end sub
Merci pour votre aide
-- Franck
bonjour,
With Target
If .Column = 11 Then
.Parent.Unprotect "motdepasse"
Range(.Offset(0, -10), .Offset(0, 0)).Locked = True
.Parent.Protect "motdepasse"
End If
End With
A+
Bonjour à tous,
je voudrais vérrouiller une plage de cellules (même ligne)si le contenu
d'une cellule change. La cellule en question se trouve dans la colonne K et
je voudrais vérrouiller toutes les cellules de la ligne concernée de la
colonne A à la colonne K
j'ai tapé le code suivant mais rien ne se produit
Private Sub worksheet_change(ByVal target As Range)
If target.Column = 11 Then target.Offset(0, -10).Locked = True
With Target If .Column = 11 Then .Parent.Unprotect "motdepasse" Range(.Offset(0, -10), .Offset(0, 0)).Locked = True .Parent.Protect "motdepasse" End If End With
A+
Bonjour à tous,
je voudrais vérrouiller une plage de cellules (même ligne)si le contenu d'une cellule change. La cellule en question se trouve dans la colonne K et je voudrais vérrouiller toutes les cellules de la ligne concernée de la colonne A à la colonne K
j'ai tapé le code suivant mais rien ne se produit
Private Sub worksheet_change(ByVal target As Range)
If target.Column = 11 Then target.Offset(0, -10).Locked = True
end sub
Merci pour votre aide
-- Franck
Sky
Merci ca fonctionne impec
@+
"anonymousA" a écrit dans le message de news:
bonjour,
With Target If .Column = 11 Then .Parent.Unprotect "motdepasse" Range(.Offset(0, -10), .Offset(0, 0)).Locked = True .Parent.Protect "motdepasse" End If End With
A+
Bonjour à tous,
je voudrais vérrouiller une plage de cellules (même ligne)si le contenu d'une cellule change. La cellule en question se trouve dans la colonne K et je voudrais vérrouiller toutes les cellules de la ligne concernée de la colonne A à la colonne K
j'ai tapé le code suivant mais rien ne se produit
Private Sub worksheet_change(ByVal target As Range)
If target.Column = 11 Then target.Offset(0, -10).Locked = True
end sub
Merci pour votre aide
-- Franck
Merci ca fonctionne impec
@+
"anonymousA" <anonymousA@discussions.microsoft.com> a écrit dans le message
de news: 00011729-7A45-4FF4-A52C-0B677A9E2011@microsoft.com...
bonjour,
With Target
If .Column = 11 Then
.Parent.Unprotect "motdepasse"
Range(.Offset(0, -10), .Offset(0, 0)).Locked = True
.Parent.Protect "motdepasse"
End If
End With
A+
Bonjour à tous,
je voudrais vérrouiller une plage de cellules (même ligne)si le contenu
d'une cellule change. La cellule en question se trouve dans la colonne K
et
je voudrais vérrouiller toutes les cellules de la ligne concernée de la
colonne A à la colonne K
j'ai tapé le code suivant mais rien ne se produit
Private Sub worksheet_change(ByVal target As Range)
If target.Column = 11 Then target.Offset(0, -10).Locked = True
With Target If .Column = 11 Then .Parent.Unprotect "motdepasse" Range(.Offset(0, -10), .Offset(0, 0)).Locked = True .Parent.Protect "motdepasse" End If End With
A+
Bonjour à tous,
je voudrais vérrouiller une plage de cellules (même ligne)si le contenu d'une cellule change. La cellule en question se trouve dans la colonne K et je voudrais vérrouiller toutes les cellules de la ligne concernée de la colonne A à la colonne K
j'ai tapé le code suivant mais rien ne se produit
Private Sub worksheet_change(ByVal target As Range)
If target.Column = 11 Then target.Offset(0, -10).Locked = True
