マクロ実行エラーがでます。どなたがどうかお教え下さい。 - Wクリック... - Yahoo!知恵袋

マクロ実行エラーがでます。どなたがどうかお教え下さい。 Wクリックすると指定セル内に写真を貼り付けるマクロなのですが、 PCによってうまく貼り付ける事ができるのもあったりするのですが、 できない時はエラーがでます。 実行エラー’-2147024891（80070005）’Relative To Oringinal Size 引数は、ピクチャまたはOLEオブジェクトにしか適用できません。 と表示されます。 どうかお教え下さい。 よろしくお願い致します。 下記マクロです。 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, _ Cancel As Boolean) Dim myPic, myNo, objShape Dim rX As Double, rY As Double If Intersect(Target, R