CSVファイルの起動を速くするには?

解決


PipeKatoo!  2003-09-12 21:34:13  No: 79398  IP: [192.*.*.*]

VBでシーケンシャル出力でCSVファイルを造り、
それを最後にEXCELで起動というプログラムつくりました。
さいごに行っているのは・・

Set EXOB = CreateObject("Excel.Application")
EXOB.Visible = True
EXOB.Workbooks.Open FileName:="DATA1.CSV" 

としてます。ごくごく一般的だと思うのですが、このCSVが数千行あるCSVで
このようにして開くと開くまでの時間が数分かかってしまうのです。
しかし、VBから開かずにエクスプローラ上でダブルクリックしてこのファイルを
開くとものの10秒程度で開いてくれます。

開けるのは同じなのですが・・この違い判る方・・また速くVBから開く方法
ご存じの方どうかご指導ください。

編集    削除
nanashi  2003-09-12 22:56:34  No: 79399  IP: [192.*.*.*]

Shellで起動してみては?

編集    削除
PipeKatoo!  2003-09-13 03:09:42  No: 79400  IP: [192.*.*.*]

(;´Д`)
起動速くなりました。解決です。

nanashi3ありがとうございます。
ちなみに変更後はこうです。

EXCEL_ID = Shell(ExcelPath & " DATA1.csv", vbMaximizedFocus)

ExcelPathは上の方のでCreateObjectしたものから.pathでもらいました。

編集    削除