VBA 讀取txt檔 goldberg73 PTT批踢踢實業坊

VBA 讀取txt檔

作者: goldberg73 (高柏) 2015-07-20 22:25:17

如果有一個txt檔,內容如下
甲乙丙12345 5612
你好嗎12545 12123
我很好 2451234568
想要輸出至EXCEL，第一列每三個字元輸出至一個儲存格,
第二列每五個字元輸出一個儲存格,第三列每六個字元輸出至一個儲存格。
輸出至sheet結果如下表
A B C
1 甲乙丙 12345 5612
2 你好嗎 12545 12123
3 我很好 2451 234568
不知道VBA coding 要麼寫??
謝謝~!!

作者: johnpage (johnpage) 2015-07-20 22:51:00

巨集

作者: wenyonba (射後不理很XX啊!!!!) 2015-07-20 23:34:00

我怎麼覺得你的解釋跟你的輸出根本對不起來XD~~

作者: lichuw (一切都是無解) 2015-07-20 23:54:00

讀取字串後用StrConv(字串,vbFormUnicode) 先轉換字串迴圈 For i=1 to LenB(轉換後的字串) step 6取出字串= MidB(轉換後的字串,i,6)再用StrConv(取出的字串,vbUnicode) 把字串轉串回去再把得到的字串填到你要的cell裡就好

作者: MOONRAKER (㊣牛鶴鰻毛人) 2015-07-21 21:49:00

完全不知道在解釋什麼。

作者: m9556 (紫色天平Boy) 2015-08-05 17:13:00

把你的TXT覆製貼上，直接用資料剖析，不用寫程式

繼續閱讀

[VBA ] 不好意思這是c的問題，但介面一樣都是VSQ1Q2Q3 [.NET] 請教有關vb.net物件導向hawfu [.NET] NPOI複製sheetbecause25 [.NET] 想問有關Draggable Component的問題...easterday [VBA ] AutoFilter篩選多個值chris75123 [VB6 ] [VBA]請問VBA可以宣告不連續的陣列嗎?gecer [VBA ] 用vba求解Floyd演算法harck17551 [VBA ] 動態陣列如何做全域宣告unfinish [.NET] GridView 的 Button 顯示隱藏because25 [VB6 ] 請問一下...程式求解zzire