PTT數位生活區 / Visual_Basic

VBA 讀取txt檔

看板Visual_Basic作者 (高柏)時間9年前 (2015/07/20 22:25), 編輯推噓5(5推 0噓 4→)
留言9則, 5人參與, 最新討論串1/1
如果有一個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
推
07/20 22:51, , 1F
巨集
07/20 22:51, 1F
推
07/20 23:34, , 2F
我怎麼覺得你的解釋跟你的輸出根本對不起來XD~~
07/20 23:34, 2F
推
07/20 23:54, , 3F
讀取字串後用StrConv(字串,vbFormUnicode) 先轉換字串
07/20 23:54, 3F
→
07/20 23:55, , 4F
迴圈 For i=1 to LenB(轉換後的字串) step 6
07/20 23:55, 4F
→
07/20 23:57, , 5F
取出字串= MidB(轉換後的字串,i,6)
07/20 23:57, 5F
→
07/20 23:58, , 6F
再用StrConv(取出的字串,vbUnicode) 把字串轉串回去
07/20 23:58, 6F
推
07/21 00:01, , 7F
再把得到的字串填到你要的cell裡就好
07/21 00:01, 7F
→
07/21 21:49, , 8F
完全不知道在解釋什麼。
07/21 21:49, 8F
推
08/05 17:13, , 9F
把你的TXT覆製貼上，直接用資料剖析，不用寫程式
08/05 17:13, 9F
‣ 更多 goldberg73 的文章
文章代碼(AID): #1LhGJFzz (Visual_Basic)
Visual_Basic 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 goldberg73 的文章
文章代碼(AID): #1LhGJFzz (Visual_Basic)