OVH Cloud OVH Cloud

apparition d'image après une condition

1 réponse
Avatar
gilou
Bonjour =E0 tous

je voudrais savoir s'il =E9tait possible de faire=20
apparaitre une image dans une feuille =E0 partir d'une=20
condition .

Exemple "si a1<10 then apparition d'un personnage=20
souriant;apparition d'un personnage triste"

Ceci me servirait =E0 animer des grahs .
Existe-t-il une solution?
Merci d'avance pour votre r=E9ponse

1 réponse

Avatar
Daniel
Bonjour.
Rattache ce code à l'évènement qui correspond à ton souhait.

Sub Test()
If Range("A1").Value < 10 Then
ActiveSheet.Shapes("Picture 1").Visible = False
ActiveSheet.Shapes("Picture 2").Visible = True
Else
ActiveSheet.Shapes("Picture 1").Visible = True
ActiveSheet.Shapes("Picture 2").Visible = False
End If
End Sub

Rattache ce code à l'évènement qui correspond à ton souhait.
Cordialement.
Daniel

"gilou" a écrit dans le message de
news: 268f01c52ed3$8e28c1a0$
Bonjour à tous

je voudrais savoir s'il était possible de faire
apparaitre une image dans une feuille à partir d'une
condition .

Exemple "si a1<10 then apparition d'un personnage
souriant;apparition d'un personnage triste"

Ceci me servirait à animer des grahs .
Existe-t-il une solution?
Merci d'avance pour votre réponse