Bonjour,

J'ai écris un code qui lorque je fais un click droit sur une cellule un message affiche son contenu :


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
 
If Target.Value <> "" Then
        a = Target.value
        MsgBox (a)
    End If
    Cancel = True
 
End Sub
Dans l'idéal je voudrais que "a" soit égale a la position de la valeur dans une autre liste de données.

J'espère avoir été clair ... Merci de votre aide !