Excel VBA質問箱 IV

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

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


40315 / 76732 ←次へ | 前へ→

【41516】Re:Cells関数の処理時間
回答  Kein  - 06/8/12(土) 18:11 -

引用なし
パスワード
   読み込みはループ処理にしなければなりませんが、
書き込みは作った配列を一気にセルに流し込む形にすることが
出来ます。むしろそのために配列を作ってるようなものなんだけど・・。

Sub Test_MyArray()
  Dim i As Long, j As Long
  Dim Ary(1 To 2000, 1 To 10)
 
  For i = 1 To 2000
   For j = 1 To 10
     Ary(i, j) = _
     Val(Sheets("Sheet1").Cells(i, j).Value)
   Next j
  Next i
  Worksheets("Sheet2").Range("A1:J2000").Value = Ary
  Erase Ary
End Sub

ちなみにこのマクロの処理時間は、初回の実行時でも2秒以下でしたが・・。
1 hits

【41495】Cells関数の処理時間 パプチ 06/8/12(土) 8:12 発言
【41496】Re:Cells関数の処理時間 かみちゃん 06/8/12(土) 8:25 発言
【41509】Re:Cells関数の処理時間 パプチ 06/8/12(土) 15:59 発言
【41510】Re:Cells関数の処理時間 かみちゃん 06/8/12(土) 16:09 発言
【41513】Re:Cells関数の処理時間 パプチ 06/8/12(土) 17:33 発言
【41514】Re:Cells関数の処理時間 かみちゃん 06/8/12(土) 18:01 発言
【41516】Re:Cells関数の処理時間 Kein 06/8/12(土) 18:11 回答
【41522】Re:Cells関数の処理時間 パプチ 06/8/12(土) 19:56 お礼
【41523】Re:Cells関数の処理時間 かみちゃん 06/8/12(土) 20:05 発言
【41524】Re:Cells関数の処理時間 かみちゃん 06/8/12(土) 20:11 発言
【41530】Re:Cells関数の処理時間 パプチ 06/8/12(土) 21:36 お礼
【41525】Re:Cells関数の処理時間 Kein 06/8/12(土) 20:12 発言
【41520】Re:Cells関数の処理時間 Hirofumi 06/8/12(土) 19:44 回答
【41527】Re:Cells関数の処理時間 パプチ 06/8/12(土) 20:45 お礼

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