Change pictures in Excel?

P

petterss

Hi!
I want to change a picture depending of a choice in a cell!
EX: In D3 I have a list (dog, cat and bird) and I want to show a
picture of the choice beside the list!
Can I do that :confused:

Thanks :) !
 
P

petterss

Ken said:
Hi peterss,

Check out John McGimpsey's site...

http://www.mcgimpsey.com/excel/lookuppics.html

Ken Johnson
Click to expand...


Hi !
I want to show a picture depending of a choice in a specific cell.
have asked before and I get a link to some exempel, the problem is tha
a get an error message and I dont now what to do (I´m a amateur!).

The link was: http://www.mcgimpsey.com/excel/lookuppics.html

I copy the code to my file, but I get an "error 13 - miss match" al
the time.
Code:
Private Sub Worksheet_Calculate()
Dim oPic As Picture
Me.Pictures.Visible = True
With Range("B41")
For Each oPic In Me.Pictures
If oPic.Name = .Text Then
oPic.Visible = True
oPic.Top = .Top
oPic.Left = .Left
Exit For
End If
Next oPic
End With
End Sub

"oPic.Name" never get the same like ".Text", my pictures have name
like 212,213... but "oPic.Name" is like 103,104...
So when it comes to "Next oPic" it stops!

What should I do? Where is the pictures defind? Whats "Me.Pictures"?

Thank
 
Top