Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

36097 / 76732

←次へ　｜　前へ→


	【45820】Re:Dimについて

neptune - 07/1/15(月) 10:20 -


	引用なし

	パスワード

▼tomo さん：
>ReDimについて，教えていただきたいのですが，割り当て数の大小によって終了までの所要時間（ﾒﾓﾘｰの使用量）に変化は出てくるものなのでしょうか？
追記
VB系のサイトと勘違いしてました。
（キツさが・・・Excelではちょっとキツかった^ ^;)
redim自体での所要時間は要素数によって、体感できるほどの差は生じないです。
自分で計ってみれば納得します。

Public Declare Function timeGetTime Lib "winmm.dll" () As Long

Private T1 As Long, T2 As Long

Sub t()
Dim a() As Long

　　T1 = timeGetTime
　　ReDim a(10)
　　T2 = timeGetTime
　　Debug.Print "要素数10　　：　" & (T2 - T1) / 1000 & " Sec"
　　T1 = timeGetTime
　　ReDim a(1000000)
　　T2 = timeGetTime
　　Debug.Print "要素数1000000：　" & (T2 - T1) / 1000 & " Sec"

End Sub

1 hits

▼

【45816】Dimについて tomo 07/1/15(月) 8:35