Thread
:
Insert Images Using Conditional Format (Many)
View Single Post
#
3
Posted to microsoft.public.excel.misc
Gord Dibben
external usenet poster
Posts: 22,906
Insert Images Using Conditional Format (Many)
Looks to me like the posted code is from John's lookuppics.xls which allows for
only one image.
Here is a third option.
Got to Debra Dalgeish's site for a sample workbook from Bernie Dietrick for
adding pictures via selections.
Allows for more than one picture to be displayed on a sheet.
http://www.contextures.on.ca/excelfiles.html#DataVal
DV0049 - ClipArt Selection
Gord Dibben MS Excel MVP
On Wed, 3 Oct 2007 19:07:47 -0400, "Ron Coderre"
wrote:
Here are two options:
If you want to read the pictures from a folder:
http://www.contextures.com/excelfiles.html#CH0003
or....if you want to store the pictures in the Excel workbook:
http://www.mcgimpsey.com/excel/lookuppics.html
Is that something you can work with?
Post back if you have more questions.
--------------------------
Regards,
Ron (XL2003, Win XP)
Microsoft MVP (Excel)
"Mike Garcia" <Mike
wrote in message
...
¡Hello!
I am quite new into VBA, and I need some help from knowledgeable users.
My Question, before I start explaining is:
¿How can I insert multiple conditional images in the same spreadsheet,
that
react to the value in different cells?
Explanation:
I have a small Excel File, used to compare different features between two
products, in two columns. You pick the product in a Validated Cell (drop
down
box) on the top of the column, and all the information about that product
is
filled down using conditional formatting. I inserted function to also
display
a pic of the product in that column, using the code:
Private Sub Worksheet_Calculate()
Dim oPic As Picture
Me.Pictures.Visible = False
With Range("B8")
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
It worked quite well with one image...But, when I tried to apply the a
second code for the second product column in the same Sheet, I found out
that
the first code (Set to Me.Pictures.Visible=False) hid the pictures that
the
second code attempted to display. (Or that is my guess).
¿How can I insert multiple conditional images in the same spreadsheet,
that
react to the value in different cells?
¡Any help would be greatly appreciated!
Reply With Quote
Gord Dibben
View Public Profile
Find all posts by Gord Dibben