image conditionnelle

  • Initiateur de la discussion nicolas
  • Date de début
N

nicolas

Guest
Salut le forum,

je suis actuellement sur un os.
Je voudrais affecter dans une cellule et en fonction de la valeur d'une autre cellule une image variable.

(ex : écart (par rapport à un objectif) trop élevé => smiley triste ; écart faible => smiley content etc...)

A priori il n'existe pas d'autres solutions que du codage non?

Je dois dire que je ne peux pas faire de mise en forme conditionnelle classique (avec les couleurs et les polices) car des graphiques sont liées aux données, et sur ces graphiques doit figurer quelque chose qui montre l'écart vis-à-vis de l'objectif (comme les smiley).

Merci d'avance pour l'aide que vous m'apporterez.
a plus
koko
 
S

Sebb

Guest
Salut a toi
____________________________________________________
Private Sub Worksheet_Change(ByVal Target As Excel.Range)

If Range("A1") = 500 Then
Shapes("Content").Visible = False
Shapes("PasContent").Visible = True

Else
Shapes("Content").Visible = True
Shapes("PasContent").Visible = False
End If

End Sub
_____________________________________________________
Voilà
 
N

nicolas

Guest
Salut Seb,

et merci pour cette réponse rapide!

Malheureusement je suis encore un peu débutant en VBA et si c'est pas trop demandé, il me faudrait quelques explications supplémentaires.
J'envoie un petit début de fichier à compléter comme ca ce sera plus simple (et si c'est pas abusé!)
Le bins c'est : - il faut que la macro sache ou sont les smiley
- c'est toute une série de lignes et pas une seule

Rq : écart < 10 % => content
10% < écart < 30% => moyencontent
écart > 30% => PAs content

merci d'avance
koko
 

Pièces jointes

  • testimage.zip
    2.7 KB · Affichages: 134
  • testimage.zip
    2.7 KB · Affichages: 134
  • testimage.zip
    2.7 KB · Affichages: 132
C

C@thy

Guest
Bonjour Nicolas, re Sebb, re le foruml

je t'ai bricolé un petit truc, le problème c'est que l'image elle s'affiche en B1

or il faudrait la recopier en lea décalant d'une ligne en fonction du teste de la colonne A même ligne. Là, il me faut un PRO du VBA car moi pas savoir faire.

C@thy
BipBip.gif
 

Pièces jointes

  • ChangeImage.zip
    10.9 KB · Affichages: 227
T

Ti

Guest
une solution très simple et sans macro. Désolé, je n'ai pas le temps d'ouvrir ton classeur d'exemple, mais c'est facile à adapter.
 

Pièces jointes

  • smiley.zip
    3.5 KB · Affichages: 530
  • smiley.zip
    3.5 KB · Affichages: 531
  • smiley.zip
    3.5 KB · Affichages: 529
N

nicolas

Guest
Salut Cathy,

Merci pour ton bricolage je vais regarder de suite.

je suis pas un pro du tout d'excel donc si une solution vous vient à l'esprit par la suite n'hésitez pas!
a plus
koko le plus beau
 
C

C@thy

Guest
image conditionnelle recherche autre soluces

Coucou Ti, re Nicolas et Sebb

j'ai bidouillé un rebricolage du fichier de Ti, étant donné qu'on ne peut pas
imbriquer plus de 7 SI, (au cas où!)

j'ai essayé avec la fonction CHOISIR, qui donne 26 possiblités, ça marche!

Mais avec RECHERCHEV, echec!
Peut-être EQUIV, mais là je sais pas! Monique, Jean-Marie, Ti et Véri et tous les pros des formules, pouvez regarder ce qui cloche dans ma formules svp?

Merci...

C@thy
BipBip.gif
 

Pièces jointes

  • smileyTi.zip
    9.8 KB · Affichages: 207
  • smileyTi.zip
    9.8 KB · Affichages: 222
  • smileyTi.zip
    9.8 KB · Affichages: 205
N

nicolas

Guest
Re tlm,

merci cathy pour ce rebidouillage.
Ence qui me concerne la solution de Ti me convient car j'ai que 3 possiblités d'images.
Je suis néanmoins ravi d'avoir posé un problème qui pose problème!
a plus
koko
 
T

Ti

Guest
Tes désirs sont désordres SuperC@thy (euh non, des ordres). Alors j'ai placé une formule avec la fonction ADRESSE, que je n'utilise pratiquement jamais. Ainsi on peut renvoyer une valeur parmi x au moyen d'une simple liste de validation.
Dans d'anciens posts (dont je n'ai plus les références, hélas) j'avais présenté tout un tas de solutions différentes pour afficher des images conditionnellement.

la formule utilisée :

=INDIRECT(ADRESSE(EQUIV(Feuil1!$A$5;XLD;0);10;1;1;"Feuil2"))

la plage XLD a été un peu modifiée
 
C

C@thy

Guest
Bonjour le forum,

Ti, j'ai essayé ta supermagicformule, ça coince, tout comme ma recherchev!
(fichier joint), donc c'est pas ta formule qui coince mais ma façon de la mettre, je pense, tout comme le recherchev. (attention, je ne maîtrise pas le contenu de ta formule!!!).

Tu auras une crêpe quand même, avec de la confiture! (Au fait, tu sais ce que c'est que la confiture de canneberge? Il y a la photo dans Configest).

Biz

C@thy
BipBip.gif
 

Pièces jointes

  • smileyTi.zip
    7.6 KB · Affichages: 110
  • smileyTi.zip
    7.6 KB · Affichages: 105
  • smileyTi.zip
    7.6 KB · Affichages: 110

Statistiques des forums

Discussions
312 322
Messages
2 087 284
Membres
103 507
dernier inscrit
tapis23