Macro pour protéger une ligne

Bonjour,

Ci-joint une fichier avec la macro suivante pour protéger la ligne complète du tableau si la colonne 6 = "V":

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim oList As ListObject

Set oList = Target.ListObject

If Not oList Is Nothing And Target.Count = 1 Then

lig = Target.Row - 4

If oList.Range(lig, 6) = "V" Then

Target.Offset(, -1).Select

End If

End If

Set oList = Nothing

End Sub

Comment obtenir le meme resultat par rapport au tableau et non à la position du tableau dont les titres doivent etre en cinquième ligne. ( lig = Target.Row - 4)????

je ne sais pas si j'ai bien posé le problème!!

Merci

Bonjour Pierro, bonjour le forum,

Dans une autre forum, vendredi tu indiques que ton problème est résolu puis tu viens le reposer ici aujourd'hui. C'est du foutage de gueule ?!...

Bonjour Pierro, bonjour le forum,

Dans une autre forum, vendredi tu indiques que ton problème est résolu puis tu viens le reposer ici aujourd'hui. C'est du foutage de gueule ?!...

Bonjour

1/ Un autre forum oui j'en avais urgemment besoin

2/ Mon principal forum est celui ci et j'en suis satisfait

3/ je viens de me rendre compte du point, objet de ce post, d'ou je l'vais marqué comme résolu.

3/ Je ne vous connais mais sachez que je n'apprécie vos mots

Merci

Re,

3/ Je ne vous connais mais sachez que je n'apprécie vos mots

Aïe ! J'ai mal... Trop comique...

Rechercher des sujets similaires à "macro proteger ligne"