J'ai une liste de références (colonne A) et une liste de références (colonne B), j'aurais souhaité repérer les valeurs identiques lorsqu’une référence de la colonne B est retrouvée dans la colonne A.
J'ai fait des essais, mais je ne m'en sort plus... j'avais eu l'idée d'avoir le n° de ligne comme repère mais ceux-ci ne correspondent pas... l'idéal serait que la valeur correspondante en colonne A soit mise en forme couleur au niveau de la police ou de la couleur de remplissage qui me permettrait de filtrer sur la couleur afin de pouvoir vérifier.
Au lieu de colorer la cellule trouvée, le code suivant permet, par clic double en colonne d, d'atteindre la ligne mentionnée.
Nota : je n'ai pas su comment éviter "On Error Resume Next".
VB:
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal c As Range, Cancel As Boolean)
Dim mem As Long
On Error Resume Next
mem = c
If c.Value = "" Or c.Column <> 4 Or IsError(c) Then Exit Sub
Rows(mem).Select
End Sub
Au lieu de colorer la cellule trouvée, le code suivant permet, par clic double en colonne d, d'atteindre la ligne mentionnée.
Nota : je n'ai pas su comment éviter "On Error Resume Next".
VB:
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal c As Range, Cancel As Boolean)
Dim mem As Long
On Error Resume Next
mem = c
If c.Value = "" Or c.Column <> 4 Or IsError(c) Then Exit Sub
Rows(mem).Select
End Sub