Insert Picture in cell, click commanbutton to rename picture, lock cell and remove button

I have a workbook that will be distributed to co-workers. There is one page visible where there is 6 cells unlocked for them to size a picture to fit the area. Beside this is a "commandbutton1" which they will then click, changing the name of the picture to "picture 1", locking cells, changing to none what users are allowed to do after protecting, removing the commandbutton and lock the sheet. I have tried doing this with the recorder, but it seems to miss steps. I do not know what the picture will be called when fit into the open cells, how do I name this to rename it? Is there a wildcard? Thanks.

Try the following code, which needs to be placed in the code module for the sheet (right-click the sheet tab, and select 'View Code')...

Please Login or Register  to view this content.

If the worksheet is protected without a password, replace...

Please Login or Register  to view this content.

with

Please Login or Register  to view this content.

Also, the merged cells do not need to be Locked in order to insert a picture. So if the user only needs to insert a picture and doesn't need to enter any data within the merged cells, they can be left Locked and the following lines of code can be deleted...

Please Login or Register  to view this content.

Note that in a protected worksheet "Edit Objects" needs to be checked in order to allow users to insert a picture.

Hope this helps!

Yeah, the message will appear when there's no picture within the merged cells.

I'm glad I could help. And thanks for the feedback.

Cheers!