Re: [算表] 已解決-巨集處理大量txt轉存xls欄位相減另存

看板Office作者 (小慧的尪 <( ̄︶ ̄)/)時間11年前 (2014/07/05 18:29), 11年前編輯推噓0(003)
留言3則, 1人參與, 最新討論串2/2 (看更多)
※ 引述《jjccck (科技開始毀滅文明了...)》之銘言: : 軟體:excel : 版本:2010 : 我手邊約有1000個記事本(.txt)要轉成excel(.xls)檔案格式 : 記事本內容很規則如圖所附http://ppt.cc/cn00 : 前後兩串數字中間有一個空白鍵隔開 : 所以需求為(.xls)檔轉出來前面字串為A欄,後面字串為B欄 : 然後再存檔,檔名與原記事本相同 : 我現在是用手工法 開啟記事本ctrl+a ctrl+c 切換到excel ctrl+v 存檔 : __________________________________________________________________ : 爬文爬了好久有人教 資料→從文字檔 : 可是這個是單一的檔案 : 我需要類似迴圈一直開,且匯完一個要存檔關閉,開新檔案匯下一個。 : 拜託強大鄉民救救心煩的小弟 感謝! 軟體:excel 版本:2010 我有一個類似這個的問題 也是從記事本(.txt)要轉成excel(.xls)檔案格式 數量也很多 ... .txt檔案 http://ppt.cc/ld7B .excel檔案 http://ppt.cc/5f3z .txt檔案中數值有空格分隔(Tab分隔) 除了第一列是文字外 其餘皆是數字 我看了之前回覆的內容 但是我不會修改 ... 請問有人知道該如何下手嗎? -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 220.136.116.174 ※ 文章網址: http://www.ptt.cc/bbs/Office/M.1404556142.A.1E3.html ※ 編輯: Virgil (220.136.116.174), 07/05/2014 19:07:44

07/05 19:56, , 1F
07/05 19:56, 1F
感謝回復!!!    我執行之後只有算了第一個檔案 .... 我修改了之前您回復其他人的檔案 有做到我想要的效果 https://dl.dropboxusercontent.com/u/12203772/txt_to_xls.xls 因為我用不到計算 只是單純把 txt 用 excel 打開 存成 xls 而已 (有tab分隔) 所以很多參數好像都用不到 像是 .... For Each i In Range("B1", Range("B" & Cells.Rows.Count).End(3)) 這個請問要如何精簡刪掉? ※ 編輯: Virgil (220.136.116.174), 07/05/2014 20:10:57

07/05 20:39, , 2F
抱歉是我誤會了上面的連結是將txt整合到一個檔案
07/05 20:39, 2F

07/05 20:39, , 3F
測試,原po修改後是可以另存的
07/05 20:39, 3F
感謝s大! 我刪除不用的語法 精簡如下  https://dl.dropboxusercontent.com/u/12203772/txt_to_xls2.xls ※ 編輯: Virgil (220.136.116.174), 07/05/2014 21:11:32
文章代碼(AID): #1JjzDk7Z (Office)
文章代碼(AID): #1JjzDk7Z (Office)