vba - 選択後に図形を貼り付ける方法

Question

Excel 2003でオブジェクトを選択した後、どのようにオブジェクトを貼り付けることができるのか疑問に思っています。

sheet1.shapes("MyShape").select

With Selection

基本的にjsutは、シェイプオブジェクト、または実際に任意のオブジェクトを複製する方法を考えています。最終的には、コードを使用して上記のような図形オブジェクトをExcelからコピーし、アクセスフォームに自動的に貼り付けることを検討しています。

ありがとう！

Answer 1

Sheets("Sheet1").Shapes("MyShape").Select
Selection.Copy
Sheets("Sheet1").Paste

もちろん、別のシートにコピーすることもできます。