Can I link *.jpg files to Excel cells?

L

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
 
G

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
 
L

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.
 
C

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
 
G

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
 
L

LAS

In the end I'll have a couple of hundred.
Cimjet said:
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
 
C

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
 
Joined
Apr 2, 2013
Messages
1
Reaction score
0
Here is a small writeup with attached examples for image hyper-linking.
gallery.technet.microsoft.com/Creating-Image-Hyperlinks-32572ae6
 

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