XL 2019 Faire apparaitre une image

azerty974 · 10 Mai 2021

Bonjour j'aimerais faire apparaitre une image si "A" est écrit dans la case F9 si rien n'est écrit alors faire disparaitre l'image
Je ne me débrouille vraiment pas très bien en VBA je voulais le faire directement sur Excel mais j'ai pu voir que c'était impossible.
Si quelqu'un pouvait m'aider ca serrait super sympas de votre pars.
Bonne journée

Lolote83 · 10 Mai 2021

Bonjour AZERTY974,
Voici un fichier qui devrait correspondre à ta demande
Enfin, si j'ai bien compris
@+ Lolote83

azerty974 · 10 Mai 2021

Je vous remercie énormément c'est parfait bonne journée !!!

sylvanu · 10 Mai 2021

Bonjour Azerty, Lolote,
Ou une solution sans VBA :

Afficher image avec conditions

Je possède 3 photo dans ma feuille excel, en fonction du résultat de la cellule "A67" je voudrai afficher l'image correspondante. si A67 = 1 -> afficher i...

forum.excel-pratique.com

azerty974 · 10 Mai 2021

Cela fonctionne mais j'aimerais remplacer "A" par un mot sauf que je ne vois pas comment faire si vous avez une solution car lorsque je met un mot l' image n'apparait plus

Webperegrino · 10 Mai 2021

Bonjour Le Forum, Lolote83, Sylvanu, Azerty974
Un proposition :

VB:

If Not Intersect(Target, [F9]) Is Nothing Then
    If [F9] <> "" Then   'vient remplacer l'expression If UCase(Target.Value) = "A" Then
   'suite du codage ...

Webperegrino

sylvanu · 10 Mai 2021

Re,
Une version modifiée du fichier.
On ajoute la liste des mots désirés et une liste déroulante donne l'image à afficher.

XL 2019 Faire apparaitre une image

azerty974

XLDnaute Nouveau

Lolote83

XLDnaute Barbatruc

Pièces jointes

azerty974

XLDnaute Nouveau

sylvanu

XLDnaute Barbatruc

Afficher image avec conditions

azerty974

XLDnaute Nouveau

Webperegrino

XLDnaute Impliqué

sylvanu

XLDnaute Barbatruc

Pièces jointes

Discussions similaires