Afficher une image de mon classeur dans un userform
Bonjour le forum,
Voila j'essaie d'afficher une image présente dans la feuil1 de mon classeur.Malheureusement le code suivant affiche seulement l'userform sans la photo chargée dedans.
Code:
1
2
3
4
5
6
|
Private Sub UserForm1_Initialize()
Dim Sh As Shape
Set Sh = Worksheets("Feuil1").Shapes(1)
Image1.Picture = LoadPicture(Sh)
End Sub |
En vous remerciant d'avance de votre aide précieuse. :D
Voir la solution de Patrick TOULON
Bonjour,
Voir la solution de Patrick TOULON qui fonctionne parfaitement sur mon pc (Excel 2010).
Cordialement.
