Copy paste icons/pictures

Hi all

Been a while since i call appon you all to help, but funny enough i have a lot of time now indoors to learn Excel, i have a sheet and would like help with please.

The sheet has icon/picture on one sheet and i want to be able to press the icon/picture and its paste onto the sheet.

I have a sheet that already has this function but is old version and me having 365 is don't seem to work? can anyone help please

below is what should work but dot seem to

excel help.PNG

Cheers Si

Sub Picture10_Click()

Sheets("Icons").Select
ActiveSheet.Shapes("Picture 1572").Select
Selection.Copy
Sheets("SURVEY").Select
Range("D29").Select
ActiveSheet.Paste
End Sub

Administrative Note:

We would very much like to help you with your query, however the thread title does not really convey what your request is about.

Please take a moment to amend your thread title. Make sure that the title properly explains your request. Your title should be explicit and not be generic (this includes function names used without an indication of what you are trying to achieve).

Please see Forum Rule #1 about proper thread titles and adjust accordingly. To edit the thread title, open the original post to edit and then click on Go Advanced (bottom right) to access the area where you can edit your title.

(Note: this change is not optional. No help to be offered until this moderation request has been fulfilled.)

Administrative Note:

We would very much like to help you with your query, however you need to include code tags around your code.

Please take a moment to add the tags. Posting code between tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Please see Forum Rule #2 about code tags and adjust accordingly. Click on Edit to open your post, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

(Note: this change is not optional. No help to be offered until this moderation request has been fulfilled.)

Also, please update your user profile to the version of Excel that you are currently using. Thanks.

Don't forget the code tags - second half of post #2.