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

解決

北村 2005-08-26 20:18:36 No: 124509

[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

Blue 2005-08-26 20:23:55 No: 124510

WorkBook の SaveAs で FileFormat:=xlCSV を指定すればいいのでは？

北村 2005-08-26 20:34:57 No: 124511

誤り送信なため閉めます