VBA 讀取txt檔

[goldberg73 (高柏)]

如果有一個txt檔,內容如下

甲乙丙12345  5612
你好嗎12545 12123
我很好 2451234568

想要輸出至EXCEL，第一列每三個字元輸出至一個儲存格,

第二列每五個字元輸出一個儲存格,第三列每六個字元輸出至一個儲存格。

輸出至sheet結果如下表

    A       B      C
1 甲乙丙 12345   5612

2 你好嗎 12545  12123

3 我很好  2451  234568


不知道VBA coding 要麼寫??

謝謝~!!

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.42.112.48
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1437402319.A.F7D.html
推 johnpage: 巨集
推 wenyonba: 我怎麼覺得你的解釋跟你的輸出根本對不起來XD~~
推 lichuw: 讀取字串後用StrConv(字串,vbFormUnicode) 先轉換字串
→ lichuw: 迴圈 For i=1 to LenB(轉換後的字串) step 6
→ lichuw: 取出字串= MidB(轉換後的字串,i,6)
→ lichuw: 再用StrConv(取出的字串,vbUnicode) 把字串轉串回去
推 lichuw: 再把得到的字串填到你要的cell裡就好
→ MOONRAKER: 完全不知道在解釋什麼。
推 m9556: 把你的TXT覆製貼上，直接用資料剖析，不用寫程式