Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default Help with adding hyperlinks to images

Hi,

I have a code to add hundreds of pictures to a sheet. It works perfectly! Now I need to modify it to add a hyperlink to each picture and I cannot get it to work. Any help is appreciated! The hyperlink is the same link that contains the picture, in this script is the variable FILENAME

Line_dest = n - 1
Filename = Sheets("LISTOFLINKS").Cells(n, 15).Value
Rows(Line_dest).RowHeight = 100
ActiveSheet.Pictures.Insert(Filename).Select
Set shp = Selection.ShapeRange.Item(1)
With shp
.LockAspectRatio = msoTrue
.Width = 180
If .Height 95 Then .Height = 95
.Cut
End With
Selection.Hyperlinks.Add Anchor:=Selection.ShapeRange.Item(1), Address:=Filename

Thanks
Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Adding pictures, images or objects darkside7out Excel Discussion (Misc queries) 1 March 10th 10 02:05 AM
Adding images to cells via VB.Net Cartoper Excel Programming 1 May 22nd 08 01:21 PM
How do I extract and save hyperlinks from images in excel Robert in Brisbane Excel Discussion (Misc queries) 4 December 29th 06 01:55 PM
Adding Images NickHK Excel Programming 1 December 22nd 06 11:20 AM
Adding Images Tom Ogilvy Excel Programming 0 December 22nd 06 02:24 AM


All times are GMT +1. The time now is 02:31 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"