作者lytn (sapphira)
看板Visual_Basic
標題[VBA ] Excel VBA 輸出TXT檔
時間Thu Oct 28 19:18:53 2010
我用 excel 2003 vba 內的範例
Sub OpenTextFileTest
Const ForReading = 1, ForWriting = 2, ForAppending = 3
Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile("c:\testfile.txt", ForAppending,TristateFalse)
f.Write "Hello world!"f.Close
End Sub
把EXCEL 檔案中 每一個儲存格的資料輸出到一個 a.TXT檔去
另外
開啟TextEditor(UE),把 a.TXT 全選複製貼上一樣的內容至 b.TXT
然後 用 UE看兩的檔案的 二進位碼,會不一樣,
導致一個檔可以用,EXCEL VBA做的檔部能用,請問是什麼問題呢?
ps.直接把EXCEL 用功能表上的功能存成TXT也不被第三方程式接受,
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.73.218.245
※ 編輯: lytn 來自: 203.73.218.245 (10/28 19:22)
1F：→ MOONRAKER:有時是編碼問題(utf8/big5)。 10/29 10:57
2F：→ lytn:請問如何做相關的修改?用哪個函式呢? 10/29 12:28
3F：→ MOONRAKER:要看你那第三方程式怎麼表示而定。 10/29 18:04
4F：→ lytn:後來找到了 CreateTextFile 可以選擇 UNICODE 或ASCII 11/02 18:35