Chemin d'image

[canard]

salut à tous,

je recherche le moyen d'inscrire le chemin d'une image (qui se trouve dans un usf) dans une cellule pour ensuite pouvoir retrouver l'image.

Je joint un petit fichier avec plus d'explications.

Merci
@+ [file name=imagebis.zip size=16480]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/imagebis.zip[/file]

 

[canard]

re didier09, le forum

C'est l'endroit ou le placé que je trouvé pas, c'est toi qui ma donné l'astuce , Merci.

Par contre sait tu pourquoi l'image ne s'affiche pas instantanément dans le cadre, il faut que je déplace l'usf pour quelle s'affiche ?

Merci
@+

 

[didier09]

Il faut le placer dans le code de l'userform2:


Private Sub Image1_Click()
Dim UserDir As String
Dim li As Integer

li = ActiveCell.Row

UserDir = CurDir
TheFile = Application.GetOpenFilename('image(*.jpg),*.jpg')
If TheFile = False Then ChDir UserDir: Exit Sub
With Me.Image1
.Picture = LoadPicture(TheFile)
End With

ChDir UserDir

Cells(li, 26)= TheFile

End Sub

J'ai remarquer que l'image se change que lorsque l'on ouvre à nouveau l'usf. Là je ne sais te répondre.
Didier

 

[canard]

merci beaucoup didier09,
je ne comprends pas pourquoi non plus???

@+