エクセルファイル帳票の改善について (ID:91086)

名前

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

本文 Excelで実験。やはり、参照設定無しの方が早いようで。 ◎起動と破棄の繰り返し Dim O As Object For L = 1 To LIMIT Set O = CreateObject("Excel.Application") O.Quit Set O = Nothing Next → 50回繰り返しで、5.5秒。 Dim C As Excel.Application For L = 1 To LIMIT Set C = New Excel.Application C.Quit Set C = Nothing Next → 50回繰り返しで、5.9秒。これなら誤差範囲かな。 ◎プロパティ呼び出しの繰り返し Dim O As Object Set O = CreateObject("Excel.Application") For L = 1 To LIMIT X = O.Workbooks.Count Next O.Quit Set O = Nothing → 1000回繰り返しで、1.9秒。 Dim C As Excel.Application Set C = New Excel.Application For L = 1 To LIMIT X = C.Workbooks.Count Next C.Quit Set C = Nothing → 1000回繰り返しで、3.1秒。 なお、いずれも実験を繰り返すたびに処理速度が向上。 キャッシュされるのかな。