Afficher une image en fonction du résultat d'une cellule.

Bonjour Makmaze,

Une façon simple de résoudre la problématique,

Utilise le contrôle "Image" de la barre d'outils Contrôle.

Tu places le contrôle où tu veux insérer l'image.
Tu définis la propriété du contrôle "Visible" = false

Refais la même chose pour un deuxìème contrôle affichant
la seconde image.

Et dans le module feuille où l'action se déroule, tu adaptes le code suivant :

'-----------------------------
Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = Range("A1").Address Then
If Target.Value > 5 And Target.Value < 10 Then
Shapes("Image 1").Visible = False
Shapes("Image 2").Visible = True
Else
Shapes("Image 1").Visible = True
Shapes("Image 2").Visible = False
End If
End If
End Sub
'-----------------------------


Salutations!




"Makmaze" <makmaze@invalid.com> a écrit dans le message de news:5kijnvcnqqhet8tff6s709efrf2grqqqdm@4ax.com...
Bonjour,
est-il possible dans une feuille sous Excel 97 d'afficher une image en
fonction d'un résultat. Par exemple, si le résultat d'une cellule
supérieur à un nombre, j'affiche l'image toto.jpg, sinon j'afficher
tata.jpg.
Je parle bien d'une image et non pas simplement de colorier une case.

Merci pour toute réponse.
--
Toi aussi accedes à la plénitude avec le Shaolingsu
http://tatv.free.fr

Autre similaire :
Tu insères toutes tes images sur ta feuille avec Insertion... ou un simple
copier coller en les positionnant/dimensionnant à ta guise
Pour la suite voir la proc évènementielle de Denis

AV

"Denis Michon" <denis.michon@cgocable.ca> a écrit avec sa plus belle
plume :

Bonjour Makmaze,

Une façon simple de résoudre la problématique,

[...]

End If
End If
End Sub
'-----------------------------


Salutations!

Merci, ça marche impécable !
--
Toi aussi accedes à la plénitude avec le Shaolingsu
http://tatv.free.fr