Changing a Picture or Object if a Cell equals a certain value

K

Kevin

Hi I wonder if someone can help me, I have 3 pictures which are like a "rev
counter" which represent the performance of my team. So if there performance
is low then the picture would indicate a a low performance and high would be
high and so on. I have 3 picture low, medium & high. How do get the picture
to change if a cell equals a certain value and is excel the best tool to do
this. I am trying to use excel since all the raw data is in excel format.

Thanks
 
P

Peo Sjoblom

One way if they are truly blank, select the range, press F5, select special,
select blanks, press OK. Do edit>delete or press ctrl + -, select entire row
and press OK

regards,

Peo Sjoblom
 
P

Peo Sjoblom

I Apologize, wrong post answered

Peo Sjoblom


Peo Sjoblom said:
One way if they are truly blank, select the range, press F5, select
special, select blanks, press OK. Do edit>delete or press ctrl + -, select
entire row and press OK

regards,

Peo Sjoblom
 
R

Ron Coderre

The VBA solution provided by JE McGimpsey is the generally accepted best
approach:
http://www.mcgimpsey.com/excel/lookuppics.html

This is just an alternative non-VBA solution, in case you don't want to use
programming:

Assumption: Pictures are stored on Sheet2 to be dynamically shown on Sheet1.

Select Sheet2 and turn off Grid Lines
(Tools>Options>View tab:Uncheck Grid Lines)
1)For each picture to be displayed:
1a. Insert>Picture from file. (select picture and put it in the sheet).
1b. Select the range of cells that contains the picture.
1c. Name that range of cells, using the prefix "pic" followed by the
dropdown list text:
Example for a picture of an Elephant:
Insert>Name>Define
Name: picElephant

2)Build your data validation list on a cell in Sheet1 and pick one of the
items.

3)Create a dynamic range name that refers to that cell:
Insert>Name>Define
Name: ShowMyPic
RefersTo: =INDIRECT("pic"&Sheet1!$A$1)
....or whatever cell you chose.

4)Copy/Paste one of the pictures from Sheet2 to the display cell on Sheet1.

5)With the picture selected, type this in the formula bar, then press [Enter]:
=ShowMyPic

The picture will be replaced by the picture referred to by the dropdown list.

Each time you select a different item in the list, the associated picture
will appear in the picture box and resize appropriately.

Is that something you can work with?
***********
Regards,
Ron

XL2002, WinXP
 
J

Joel

You can use a wroksheet change function like the one below. I put the 3
picture on top of each other. Then by entering 1, 2, or 3 in cell A1 a
different picture moved to the front.

Sub worksheet_change(ByVal Target As Range)

If Target.Row = 1 And Target.Column = 1 Then

Select Case Target.Value

Case 1
Shapes("Picture 1").ZOrder msoBringToFront
Case 2
Shapes("Picture 2").ZOrder msoBringToFront

Case 3
Shapes("Picture 3").ZOrder msoBringToFront

End Select

End If

End Sub
 
K

Kevin

Hi Ron

I will try this over the weekend thanks seems to make sense I will let you
know how it turns out

Kev

Ron Coderre said:
The VBA solution provided by JE McGimpsey is the generally accepted best
approach:
http://www.mcgimpsey.com/excel/lookuppics.html

This is just an alternative non-VBA solution, in case you don't want to use
programming:

Assumption: Pictures are stored on Sheet2 to be dynamically shown on Sheet1.

Select Sheet2 and turn off Grid Lines
(Tools>Options>View tab:Uncheck Grid Lines)
1)For each picture to be displayed:
1a. Insert>Picture from file. (select picture and put it in the sheet).
1b. Select the range of cells that contains the picture.
1c. Name that range of cells, using the prefix "pic" followed by the
dropdown list text:
Example for a picture of an Elephant:
Insert>Name>Define
Name: picElephant

2)Build your data validation list on a cell in Sheet1 and pick one of the
items.

3)Create a dynamic range name that refers to that cell:
Insert>Name>Define
Name: ShowMyPic
RefersTo: =INDIRECT("pic"&Sheet1!$A$1)
...or whatever cell you chose.

4)Copy/Paste one of the pictures from Sheet2 to the display cell on Sheet1.

5)With the picture selected, type this in the formula bar, then press [Enter]:
=ShowMyPic

The picture will be replaced by the picture referred to by the dropdown list.

Each time you select a different item in the list, the associated picture
will appear in the picture box and resize appropriately.

Is that something you can work with?
***********
Regards,
Ron

XL2002, WinXP


Kevin said:
Hi I wonder if someone can help me, I have 3 pictures which are like a "rev
counter" which represent the performance of my team. So if there performance
is low then the picture would indicate a a low performance and high would be
high and so on. I have 3 picture low, medium & high. How do get the picture
to change if a cell equals a certain value and is excel the best tool to do
this. I am trying to use excel since all the raw data is in excel format.

Thanks
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top