ExcelのマクロでCSVファイルを開くと遅いのですが

ExcelのマクロでCSVファイルを開くと遅いのですが速く開く方法はありますか？
普通にファイル－開くに比べてかなり遅いです。

下記のVBAで記述してあります。
Workbooks.Open Filename:=fname
ActiveWorkbook.SaveAs Filename:=fname, FileFormat:=xlCSV, _
CreateBackup:=False
ActiveWorkbook.Close savechanges:=False

No.1 ベストアンサー 回答者： marubouzu 回答日時： 2001/01/16 14:35

fnameにパス＋ファイル名を入力しておいて開くのですよね。

ＣＳＶファイルを開くだけなら、１行目の記述だけで開けます。
このＶＢＡでは、その後ファイルをセーブしてクローズしてます。
このセーブ、クローズの作業分遅いのではないでしょうか？

この回答への補足

実は、DBFファイルをExcelで開いてfname（CSVファイル）で保存しています。
それで２，３行目が記述してあります。
４種類のDBFファイルで４種類のCSVファイルを作るマクロにしてあります。
遅いのは１行目だと思うのですが・・・

補足日時：2001/01/16 15:50

No.2 回答者： marubouzu 回答日時： 2001/01/17 10:04

ＤＢＦファイルを開いてＣＳＶでセーブしているのですか。

済みません、ＤＢＦファイルは扱った事が無いのでよく分かりません。
ＣＳＶファイルを開く限りに於いては、マクロもファイル開くも変わらないという印象ですが...

マクロの記録を有りにして、”普通にファイル－開く”を行い、生成されたＶＢＡを比較してみては如何でしょうか？