Create hyperlinks with Shapes

This code finds and matches the Text value of a Shape to the value of a cell on seperate worksheets within the same workbook.

Please Login or Register  to view this content.

Questions:
How can I write code to create a hyper link from the Shape to the cell? If the user clicks on the shape it links to a cell and vise~versa.
My attempt above fails, it seems to go thru the first found shape but generates an error after the second found shape.
No hyperlinks are created.

Run-time error '5':
Invalid procedure call or argument

Looks like a cell selection problem in the loop. The add hyperlink statement is inside of the ShtCell loop. The first time a hyperlink is added to link to the first ShtCell value. The second time, a hyperlink with SubAddress for the previous ShpCell already exists for ShpTemp, so the add fails.

Here's a simplified example, Rick:

Please Login or Register  to view this content.

blane245
I understand, will look into that.
Two Q's for shg.
1. This generates and error

Please Login or Register  to view this content.

Run-time error '91':
Object variable or with block variable not set

2. How does your example utilize sheet 1 column D for the comparison of "shp.TextFrame.Characters.Text"?

1. I'd need to see your workbook to see whay it's generating an error

2. It doesn't; I created a simple stand-alone example that matches shape text to column A.

No images have been harmed in making this excel workbook.

None of the images on sheet "Op60" are locked down.

See attached file.

Please Login or Register  to view this content.

And I was almost there! I created hyperlinks but they exist on the same sheet (sheet Op60).
Setting shtCell to a variable removed the initial error.

Please Login or Register  to view this content.

It kills me how you (and others here) can simplify what appears to be complicated instructions (macros).
Your example works as written.

This line,

Please Login or Register  to view this content.

... should be cleaned up to add all the other arguments (MatchCase, LookAt, ...) that default to the prior state.

Got it, thank you!