View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.misc
Mike Garcia[_2_] Mike Garcia[_2_] is offline
external usenet poster
 
Posts: 2
Default Insert Images Using Conditional Format (Many)

Before anything else, please let me thank Ron and Gord for their incredibly
quick response, both were incredibly helpful.

As a matter of fact, I need to include the pictures inside the file since it
will work as a tool for our salesforce, so we have to send just one file
without too many instructions...

I will try Bernie Dietrick's file, as it lets add many images, and display
them conditionally at the same time. Thanks again for all the resources
provided.

Have a great week!

"Gord Dibben" wrote:

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!