Can I link *.jpg files to Excel cells?

[LAS]

I would like to connect pictures to cells on a spreadsheet. Ideally, I'd
like to connect more than one to a cell. Or to its row. That would work OK
also.

Can I do it?

TIA
LAS

 

[Gord Dibben]

You can hyperlink a cell to an image stored elsewhere or to an image stored
within the workbook.

How you do it depends upon the purpose of the linking and the ultimate results
you are looking for.


Gord Dibben MS Excel MVP

 

[LAS]

1 - How do you "hyperlink" something?
2 - How do you store an image in the workbook?

 

[LAS]

I have a spreadsheet of flowers in my garden. Flower names for each row.
Various attributes for the columns. I would like to associate a picture
with each flower. Ideally a thumbnail would be visible in a cell. If not
that, then a way to display the image.

 

[Gord Dibben]

1. See help on hyperlink.

2. Insert>Picture.


Gord

 

[Cimjet]

Hi Las
How many flowers (Pictures) do you have.
I may have something for you but it's limited.
It's a macro that hides and unhides them when you select its name in a cell. any
cell.
regards
John

 

[Gord Dibben]

See John McGimpsey's site for a sample workbook that shows how to display an
image using embedded pictures and a lookup table with choices based on a Data
Validation dropdown menu.

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

Another good source for this would be a sample workbook by Bernie Dietrick.

http://www.contextures.on.ca/excelfiles.html#DataVal

DV0049 - ClipArt Selection -- Select a clipart item from a data validation
dropdown list, and that picture appears in the adjacent cell. Uses
Worksheet_Calculate event code. Excel template from Bernie Deitrick.
ClipArtEvent.zip 30kb 03-Jun-07


Gord

 

[LAS]

In the end I'll have a couple of hundred.

Hi Las
How many flowers (Pictures) do you have.
I may have something for you but it's limited.
It's a macro that hides and unhides them when you select its name in a
cell. any cell.
regards
John

 

[Cimjet]

Hi Las
What I got seem to stop working around 70.
This is the macro;
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim oPic As Picture
Dim pics()
Me.Pictures.Visible = False
For Each oPic In Me.Pictures
If oPic.Name = ActiveCell.Text Then
oPic.Visible = True
Exit For
End If
Next oPic
End Sub
------------------------
The function "Me.Pictures.Visible = False" stop working around 70, it wont hide
the picture anymore.
I don't know if anyone else could solve that problem. I could post a link with a
demo file to show you how it works, it's a DVD listing.
Regards
John