Merci Jb,
En fait c'est pour trouver des cellules qui portent le même nom dans une feuille, j'ai trouvé c'est
Range("A1") = ActiveCell.Row
Mais sinon j'utilise beaucoup la ligne en surbrillance de ton lien, à l'appui d'une MFC.
Et il faut les mêmes plages et cellules mentionnées, ce n'est pas le cas ici.
'affichage de la ligne jaune
If Not Intersect(Target, Range("A6:NK158")) Is Nothing Then
Range("A5").Value = Target.Row
End If
Cdt