1 pièce(s) jointe(s)
Insertion d'images d'une feuille excel sur un userform
Bonjour à tous,
Je suis nouveau sur ce forum, j'ai auparavant toujours trouvé mon bonheur pour les questions que j'avais sur excel/vba sur ce site, mais la je poste une demande car je suis vraiment bloqué.
Je vous explique mon problème :
J'ai créé un userform qui permet de récupérer des informations à un utilisateur et de les stocker au bon endroit sur mes feuilles excel (une sorte de formulaire).
Comme on voit sur le screenshot, à l'étape 1, je demande à l'utilisateur de choisir une société et l'image correspondante s'affiche automatiquement en haut à droite.
Ca marche très bien sauf que toutes mes images sont stockées dans un répertoire de mon PC (en local donc), et je voudrais que toutes ces images soient présentes sur une feuille excel, afin que mon application marche sur d'autres PC.
J'ai à peu près tout essayer de ce que je connaissais et j'ai cherché à peu près partout sur le web, et étonnament je n'ai rien trouvé de concluant... je fais donc appel à vos connaissances d'experts pour me donner le nom d'une fonction qui pourrait récupérer une image d'une feuille excel pour l'afficher sur le userform.
Merci beaucoup pour votre aide.
Voici le bout de code correspondant :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| Private Sub CbChoix_Change() 'Procédure permettant de lier chaque item de la ComboBox à une image
Sheets("Feuil1").Select
Select Case CbChoix.Value
'...
'...
Case "Hager"
ImClient.Picture = LoadPicture(ActiveWorkbook.Path & "\hager.jpg")
'...
'...
End Select
End Sub |
