Bonjour a tous, voici mon souci.

J'ai un fichier Exel qui comporte une image

Je souhaiterais pouvoir en cliquant sur l'image l'ouvrir dans un userform afin de pouvoir la modifier.

J'arrive a sélectionner une image sur l'ordi et l'afficher dans un UF, (cf. code ci dessous)

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Private Sub Image_Click()
    Dim file As Variant
    ' choix du fichier ...
    file = Application.GetOpenFilename
    'ouverture
    If file <> False Then
        InkPicture1.Picture = LoadPicture(file)
    End If
End Sub
mais je n'arrive pas a ouvrir une image présente dans une feuille excel pour l'afficher dans un UF.
Comment adapter le code ?
Quelqu'un pourrait m'aider ?

merci d'avance.

agd