Vba: recherche V dans un image

[ikeike]

Bonjours a tous,

J'ai un bloquage, je cherche dans une feuil recap a faire en sorte que lorsque l'on clic sur echantillon xx s'affiche les differente analyse date, resultat ect...

je voudrai donc que l'image que j'ai en photo reprenne les données d'une plage en fonction du nom ( la recherchev). Le problème c'est qu'il ne prend en compte qu'une colonne...ou ne change pas du tout. J'ai bien mon idée dessus mais je ne vois pas comment le faire.

donc voici mon vba et le fichier.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 3 And Target.Count = 1 Then
p = Application.Match(Target, Application.Index([Momo], , 1), 0)
If Not IsError(p) Then
ActiveSheet.Shapes("monShape").Visible = True
For i = 1 To 8
Cells(i + 1, 19) = [Momo].Cells(p, i)
Next i
Shapes("monshape").Left = Target.Offset(, 1).Left + 3
Shapes("monshape").Top = Target.Top
Else
ActiveSheet.Shapes("monShape").Visible = False
End If
End If

End Sub

Amicalement.

 

[ikeike]

Re : Vba: recherche V dans un image

Edit: Trouvé