Ajout Image en fonction de la valeur d'une cellule

[noel33]

Bonjour a tous, cela va faire rire les initiés tellement c'est facile mais je n'y arrive pas, et j'ai beau chercher partout...

J'aimerai afficher une image en fonction d'une valeur dans une cellule, sur le modèle suivant:

Case A1 jour donc affichage soleil,
Case A1 = nuit donc affichage Lune ...


Par exemple.

Si quelqu'un a une idée, je suis preneur!

Merci à tous pour votre aide,
N.

 

[Paf]

Bonjour,

tout dépend de la façon dont les images sont insérées dans la feuille et de la manière demodifier le texte en A1.

Voir cet essai qui fonctionne pour des images "collées" dans la feuille, nommées Image1(Soleil) et Image2 (Lune), et une validation (Jour, Nuit) en A1

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 And Not Intersect(Target, Range("A1")) Is Nothing Then
    Image1.Visible = Target.Value = "Jour"
    Image2.Visible = not Image1.Visible
End If
End Sub

A+

 

[Hasco]

Bonjour,

Avec une formule indirect et deux images intégrées.

Bonne journée

 

[noel33]

Cool merci à tous !