軟體: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
先感謝各位先進幫忙

試試totalcommander這工具 可以批次改檔名

先問檔案內要取儲存格a1的工作表名都一樣嗎

我做過類似的 用="rename "&a1&" "&b1串 貼到bat檔不過有重複的可能要先挑出來

都一樣的話，命令提示字元cmd先到該子目錄內dir /b *.xls >list.txt文字檔案內取出檔名，="'路徑["&檔名儲存格&"]工作表名稱'!a1"複製，選擇性貼上值，尋找及取代，尋找目標和取代成都打上=，這樣可取得更名要對應的檔名接著以l大所提的以批次檔來更名 ="ren "&a1&" "&b1&判斷是否重覆，用函數countif沒重覆""，有重覆"("&countif(...)&")"；前面判斷是否重覆函數countif的range上是整欄，後面括號內的計數則不是，是以絕對參照$固定範圍開始的列號，結束列號以相對參照巨集的話，迴圈dir取檔案，檔案內工作表裡某一儲存格 1.workbook.open，worksheet.range取得2.以="'路徑["&變數(完整檔名)&"]工作表名稱'!a1"方式更名 name....as