1，BAT批處理文件
A.獲取文件名
選擇部分或所有文件> Shift+右鍵單擊>復制為路徑>粘貼到Excel
B.編輯命令字符
l替換文件名前的路徑(全部替換)
l生成以下字符(空格必不可少):REN_原文件名_新文件名。
您可以使用EXCEL公式進行批處理:
例如，下面的公式可以將序列號1，2，3等相加。在文件名之前。
= concatenate ("ren "，""，a1，""，row (a1)，a1)生成批處理文件。
C.成批處理
在文件夾中創建壹個新的txt文件
l將excel中編輯的所有字符復制到txt文件中。
l文件擴展名改為bat，run。
2.VBA方法
Alt+F11，將下面的代碼復制到代碼欄，F5將運行它。
1
2
三
四
五
六
七
八
九
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Sub Rename_()
將my_Path，my_Doc作為字符串變暗
應用程序。file dialog(msofiledialog folder picker)'定位文件夾。
。顯示
。AllowMultiSelect = False
我的路徑=。選擇編輯項目(1)
以…結尾
將我定義為單身
i = 1
my _ Doc = Dir(my _ Path & amp；" \ " & amp“*”)'遍歷所有文件。
do While Len(my _ Doc)& lt；& gt0
命名我的路徑。" \ " & amp我的文件作為我的路徑。" \ " & amp我& ampMy_Doc '重命名:添加序列號。
i = i + 1
my_Doc = Dir
環
my _ Doc = Dir(my _ Path & amp；" \ " & amp"*")
i = 1
do While Len(my _ Doc)& lt；& gt' 0 '復制到excel
Cells(i，1) = my_Doc
i = i + 1
my_Doc = Dir
環