title: How to copy an ActiveX command button to another sheet and keep the name of the button
body: <p>I have tried the code below to copy an ActiveX command button from one sheet and paste it into another:</p>
  
  <pre><code>Sheets("SRC").HasACustomName.Copy
  Sheets("TRGT").Range("O1").PasteSpecial
  </code></pre>
  
  <p>I've also tried:</p>
  
  <pre><code>Sheets("SRC").Shapes("hasACustomName").Copy 
  Sheets("TRGT").Range("O1").Select 
  Sheets("TRGT").Paste
  </code></pre>
  
  <p>But the problem I have with both of these is that they rename the Command button from hasACustomName to CommandButtonX.</p>
  
  <p>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?</p>