tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^2: 実行時エラー '1004' データを貼り付けできません。
投稿日: 2018/02/23(Fri) 08:03
投稿者ほほ
> ここは VB.NET 向けの掲示板です。
> Excel VBA の質問の場合は、隣の掲示板に移動をお願いします。
すみません。今回はこちらで質問させてください。

次のように変更しましたら次のエラーでるようになりました。
記載方法に誤りなどないでしょうか?

実行時エラー '1004' 'Paste'メソッドは失敗しました 'Worksheet'オブジェクト

参考までにですが、貼り付ける画像数は約1000でして
300枚貼り付けしたあたりでいつもエラーでます。

Dim adr2 As Integer

For i = 2 To adr2
  

  Ws1.Cells(i, 2).Select '前回記載していませんでした。

  '/***************ここを変更したらエラーでるようになりました (?)   ********
  With Ws1.Pictures.Insert(Filename:="C:\test.\test.Bmp")
   .CopyPicture    'クリップボードにコピー
   .Delete         '画像をいったん削除
  End With

  Ws1.Paste   '画像を貼り付け
  '***************ここを変更したらエラーでるようになりました  (?)  ********/

Next i

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。