Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


34247 / 76732 ←次へ | 前へ→

【47695】Re:DrawingObjectsプロパティーについての質問です。
発言  Kein  - 07/3/19(月) 16:33 -

引用なし
パスワード
   先にも書いたように、Nameプロパティでの指定を止めて
Index を渡すようにしてみて下さい。例えば

j = 1   
For i = 1 To 10
  Set cp = Workbooks(book_name1).Sheets("設定シート").DrawingObjects(i)
  cp.Copy
  Workbooks(book_name2).Activate
  Sheets("Sheet1").Select
  Cells(j, 1).Select
  ActiveSheet.Paste
  Application.CutCopyMode = False
  Set cp = Nothing: j = j + 10
Next i
0 hits

【47690】DrawingObjectsプロパティーについての質問です。 Runa 07/3/19(月) 14:56 質問
【47691】Re:DrawingObjectsプロパティーについての... ウッシ 07/3/19(月) 15:12 発言
【47693】Re:DrawingObjectsプロパティーについての... Runa 07/3/19(月) 16:04 質問
【47694】Re:DrawingObjectsプロパティーについての... ウッシ 07/3/19(月) 16:14 発言
【47695】Re:DrawingObjectsプロパティーについての... Kein 07/3/19(月) 16:33 発言
【47699】Re:セルのIndex? Runa 07/3/19(月) 17:50 質問
【47701】Re:セルのIndex? Kein 07/3/19(月) 18:14 発言
【47711】Re:セルのIndex? Runa 07/3/20(火) 10:30 お礼
【47692】Re:DrawingObjectsプロパティーについての... Kein 07/3/19(月) 15:22 発言

34247 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free