Assigné une image a une cellule avec liste déroulante

[Jul74ien74]

Bonjour,

je souhaite assigné une image correspondant à un choix dans une cellule a liste déroulante.
voici mon fichier exemple.
le but est qu'en cellule F25 je choisi l'action dans la liste déroulante, cela m'affiche l'action et je souhaite que cela m'affiche dans la cellule J25 limage correspondant a l'action.

merci

 

[CHALET53]

Re : Assigné une image a une cellule avec liste déroulante

Rajoute la ligne surlignée

Private Sub CommandButton1_Click()
Dim objFeuille As Worksheet, objPict As Picture

Application.ScreenUpdating = False
feuil = ActiveSheet.Name
opt = ActiveCell.Value
jour = ActiveCell.Row
If opt <> "Créer" And opt <> "Supprimer" And opt <> "Ne pas toucher" Then Exit Sub