- 197 名前：187 mailto:sage [2009/07/26(日) 23:59:08 ]
- >192
当方の手順（マクロの自動記録）シートＡに図形があって選択していない状態から
１ 図形をクリック
２ メニューの編集−コピー
３ シートＢのタブをクリック
４ メニューの編集−貼り付け
これだけです。できたソースは↓で、1行目だけ削除すればいい。
ActiveSheet.Shapes("Picture 1").Select ←これだけ削除
Selection.Copy
Sheets("SheetB").Select
ActiveSheet.Paste
実行する際は、マクロを呼び出す前にコピーしたい図形をクリックして選択
状態にしておくこと。シートＢの貼り付け先を指定したいときは、自動記録
のときに当該セルをクリックする。
