ファイル内検索を速く行うには？ (ID:90468)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 こんなプログラムでテストしてみました。 ２０万件の最後で一致するようにデータを作りました。 結果１秒もかからないですよ。 Dim a(200000) As String Dim i As Long For i = 1 To 200000 a(i) = "number" & Format(i) Next Debug.Print Now For i = 1 To 200000 If a(i) = "number200000" Then Debug.Print a(i) Exit For End If Next Debug.Print Now PCのスペックはPentium4 2.53GHz メモリは512MB DDRです