看板 Office 關於我們 聯絡資訊
軟體:excel 版本:2007以上 網路下載的檔案 格式都是Unicode UTF-8 no Bom(65001) 但是我們系統只有吃big5 且不能裝其他軟體來轉 所以用excel巨集想做轉換 嘗試寫了一下可是無法轉換還是亂碼 有看到網路上這個方法 http://discuz.bestdaylong.com/thread-37361-1-1.html 可是不知道怎麼運用 我的程式碼檔案跟要轉換的範例檔案放在GD裡面: https://0rz.tw/dMjpQ 再麻煩大大幫我看要怎麼改 Thanks -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 39.10.36.96 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1595487858.A.931.html
soyoso: 內文提到的網路方式,uft8tobig5=...改為.SaveToFile 路徑 07/23 16:05
soyoso: 和檔名,所儲存的檔案以excel開啟則不會有亂碼 07/23 16:05
ljuber: 感謝s大 其實是不知道怎麼跟迴圈處理一堆檔案搭配寫出來 07/23 16:37
soyoso: sub 取代代號內的with...end with刪除,改UTF8ToBig5 路徑 07/23 16:57
soyoso: & 完整檔名,路徑變數filepath,完整檔名openfile,那 07/23 16:57
soyoso: function UTF8ToBig5的變數HtmlFile所接收傳來的就是路徑 07/23 16:57
soyoso: & 完整檔名,這個字串就可以用於SaveToFile 後面,要覆蓋 07/23 16:57
soyoso: 的話加上,2,沒有要覆蓋的話,變數HtmlFile再連接&字串來 07/23 16:57
soyoso: 做為新檔 07/23 16:57
ljuber: 謝謝S大 不過很奇怪轉檔後仍顯示utf8 但是可以正確轉入系 07/24 13:46
ljuber: 統 中文字也都正常 07/24 13:46
soyoso: 如果限定要big5的話,readtext取得的字串,charset再改為 07/24 15:36
soyoso: big5,writetext寫入,savetofile後就會是big5 07/24 15:36