[算表] 大量檔案自動改檔名

看板Office作者 (HungTse)時間4年前 (2019/07/03 15:16), 編輯推噓2(2018)
留言20則, 3人參與, 4年前最新討論串1/1
軟體:excel 版本:2016 請問如果有一百筆excel的檔案 想要讓程式自動把檔案名稱改成檔案內某一格的文字再.xls 要怎麼做到呢? ex: 檔案 1.xls a1= 小明 → 小明.xls 檔案 2.xls a1= 小華 → 小華.xls ...... 檔案 99.xls a1= 發大財 → 發大財.xls 檔案100.xls a1= 芒果乾 → 芒果乾.xls 如果其中有a1相同的,檔名能自動加(1)(2)…之類的,有什麼辦法能做到嗎 ex 小明(1).xls 小明(2).xls 先感謝各位先進幫忙 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 220.132.17.33 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1562138195.A.62F.html

07/03 15:26, 4年前 , 1F
試試totalcommander這工具 可以批次改檔名
07/03 15:26, 1F

07/03 15:26, 4年前 , 2F
先問檔案內要取儲存格a1的工作表名都一樣嗎
07/03 15:26, 2F

07/03 15:26, 4年前 , 3F
檔名可用文檔導入
07/03 15:26, 3F

07/03 15:27, 4年前 , 4F
我做過類似的 用="rename "&a1&" "&b1串 貼到bat檔
07/03 15:27, 4F

07/03 15:28, 4年前 , 5F
不過有重複的可能要先挑出來
07/03 15:28, 5F

07/03 15:28, 4年前 , 6F
都一樣的話,命令提示字元cmd先到該子目錄內
07/03 15:28, 6F

07/03 15:28, 4年前 , 7F
dir /b *.xls >list.txt
07/03 15:28, 7F

07/03 15:31, 4年前 , 8F
文字檔案內取出檔名,="'路徑["&檔名儲存格&"]工作表名稱'
07/03 15:31, 8F

07/03 15:31, 4年前 , 9F
!a1"
07/03 15:31, 9F

07/03 15:32, 4年前 , 10F
複製,選擇性貼上值,尋找及取代,尋找目標和取代成都打上
07/03 15:32, 10F

07/03 15:33, 4年前 , 11F
=,這樣可取得更名要對應的檔名
07/03 15:33, 11F

07/03 15:34, 4年前 , 12F
接著以l大所提的以批次檔來更名 ="ren "&a1&" "&b1&判斷是
07/03 15:34, 12F

07/03 15:34, 4年前 , 13F
否重覆,用函數countif
07/03 15:34, 13F

07/03 15:36, 4年前 , 14F
沒重覆"",有重覆"("&countif(...)&")";前面判斷是否重覆
07/03 15:36, 14F

07/03 15:37, 4年前 , 15F
函數countif的range上是整欄,後面括號內的計數則不是,是
07/03 15:37, 15F

07/03 15:38, 4年前 , 16F
以絕對參照$固定範圍開始的列號,結束列號以相對參照
07/03 15:38, 16F

07/03 15:43, 4年前 , 17F
巨集的話,迴圈dir取檔案,檔案內工作表裡某一儲存格 1.
07/03 15:43, 17F

07/03 15:43, 4年前 , 18F
workbook.open,worksheet.range取得
07/03 15:43, 18F

07/03 15:44, 4年前 , 19F
2.以="'路徑["&變數(完整檔名)&"]工作表名稱'!a1"方式
07/03 15:44, 19F

07/03 15:45, 4年前 , 20F
更名 name....as
07/03 15:45, 20F
文章代碼(AID): #1T75PJOl (Office)