Copy a picture that I click to another sheet.

Hi all new to the forum
I am trying to make a spread sheet for work that has a load of pictures on sheet one that i can click one of and then have that hyperlink to sheet 2 and copy the picture i clicked onto that sheet.
Is this possible? there is about 100 pictures i will need to do this for

Any help will be gratefully revived thanks.

Hi, and welcome to the forum. Unfortunately your post does not comply with Rule 1 of our Forum RULES. Your post title should accurately and concisely describe your problem, not your anticipated solution.

Use terms appropriate to a Google search. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will be addressed according to the OP's experience in the forum: If you have less than 10 posts, expect (and respond to) a request to change your thread title. If you have 10 or more posts, expect your post to be locked, so you can start a new thread with an appropriate title.

To change a Title on your post, click EDIT then Go Advanced and change your title, if 2 days have passed ask a moderator to do it for you. I'll change it for you on this occasion since this is your first post but please remember for the future.

Assign this macro to all the shapes.

Sub ClickMove()

    Dim shpTemp As Shape
    
    Set shpTemp = ActiveSheet.Shapes(Application.Caller)
    shpTemp.Copy
    Sheet2.Paste
    
End Sub

Of course they is probably more to you actually problem than simply copy a shape when clicked.

Originally Posted by Andy Pope

Of course they is probably more to you actually problem than simply copy a shape when clicked.

Indeed, probably spacing the pictures underneath each other or across the page springs to mind