在EXCEL中，如何根据表格中的数据，批量对文件进行重命名呢？
文件夹里有N个身份证号码命名的文件，批量改为备注姓名，可参考以下步骤
在EXCEL中打开宏，设置启用宏的方法：首先打开excel，点击左上角的【文件】，并点击【选项】；然后点击【信任中心】后打开右侧的【信任中心设置】；最后点击左侧【宏设置】并勾选右侧的【启用所有宏】点击右下角【确定】即可。
输入以下代码
Sub rename()
Dim i As Integer
Dim path As String
path = "D:\A" ‘要批量重命名的文件是D盘下A文件夹里’
For i = 2 To UsedRange.Count
If Dir(path & "\" & "*.pdf") <> "" Then
On Error Resume Next
Name path & "\" & Range("a" & i) & ".pdf" As path & "\" & Range("b" & i) & ".pdf" '.pdf，指的是要改名的文件是PDF格式，也可以改为.jpg’
End If
Next
End Sub
注意：EXCEL文件要和需要改名的文件在同一个文件夹内。这样点击运行就可以批量完重命名。