Insérer une image dans contrôle Userform

Airone784

XLDnaute Occasionnel
Bonsoir,

Voici ce que je cherche à faire et pour lequel, je ne m'en sors pas.

J'ai une Userform (UF) dans laquelle j'ai mis un contrôle image nommé image1. Dans la feuille 3 de mon classeur, je stocke mes images que j'ai nommé.

Dans la cellule A2, je tape l'animal et quand j'ouvre l'UF, je souhaiterais que l'image du chat apparaissent. Si j'avais chien en A2, évidemment l'image du chien.

J'ai essayé ceci : Me.Image1.Picture = LoadPicture(ThisWorkbook.Path & "\Chat.jpg") mais je crois que ça marche que quand le fichier n'est pas stocké dans la feuille excel. Sauf que moi je veux le laisser dans la feuille car j'ai peu d'images et que je ne veux pas avoir de pb entre le fichier et les autres fichiers images qui seraient stockés pas où il faut dans le PC.

Je vous joins un fichier simplifié de mon pb en espérant que vous puissiez m'aider.

D'avance merci beaucoup.
 

Pièces jointes

  • Image.xlsm
    49.2 KB · Affichages: 50
  • Image.xlsm
    49.2 KB · Affichages: 58
  • Image.xlsm
    49.2 KB · Affichages: 65

Airone784

XLDnaute Occasionnel
Re : Insérer une image dans contrôle Userform

Bonjour Yaloo,

Merci la solution fonctionne. Je vais maintenant essayer de la comprendre... :D

Et sur le même exemple, si je veux ajouter une autre image dans ma UF pour afficher le chat et le chien, suffit juste de copier le code et changer image1 en image2,...????
 

Discussions similaires

Réponses
1
Affichages
269
Compte Supprimé 979
C