エクセルファイルからテキストファイルを作成するには？

解決

北村 2005-08-26 11:18:36 No: 124502 IP: [192.*.*.*]

[Xp professional vb6.0 Excel2002]
8000行8列のエクセルファイルをテキストファイル（カンマ区切り）に作り変えます。
その際に、できるだけ処理が早い方法を探しています。理想は数秒です。
これまで試したのは、
１．
n = FreeFile
endRow = xlSheet.Cells(65536, 1).End(xlUp).Row
Open "temp.txt" For Output As #n
   For i = 1 To endRow
       a = xlSheet.Cells(i, 1)
       Write #n, a
Next i
Close #lngFileNo

編集削除

魔界の仮面弁士 2005-08-26 11:24:40 No: 124503 IP: [192.*.*.*]

Workbook オブジェクトの SaveAsメソッドを試してみるとか。

編集削除

北村 2005-08-26 11:32:58 No: 124504 IP: [192.*.*.*]

早い回答をありがとうございます。
誤り送信なため閉めます。

編集削除

北村 2005-08-26 11:33:39 No: 124505 IP: [192.*.*.*]

終わり

編集削除

Blue 2005-08-26 11:41:25 No: 124506 IP: [192.*.*.*]

> 誤り送信なため閉めます。
意味不明。どっちのスレも誤送信っていってる。
# 向こうにはひともともなし。。。( TДT)

> 終わり
どのように解決にいたったか書いといてください。

> できるだけ処理が早い方法を探しています。理想は数秒です。
なら、ドンくらいはやくなったか等。