I have tried the code below to copy an ActiveX command button from one sheet and paste it into another:
Sheets("SRC").HasACustomName.Copy
Sheets("TRGT").Range("O1").PasteSpecial
I've also tried:
Sheets("SRC").Shapes("hasACustomName").Copy
Sheets("TRGT").Range("O1").Select
Sheets("TRGT").Paste
But the problem I have with both of these is that they rename the Command button from hasACustomName to CommandButtonX.
Can you figure out an alternative method for pasting a command button from one sheet to another that let's me retain the original name of the Command button?
Bookmarks