1.怎么批量获取图片名称，需要在excel编辑？ 2.怎么批量对图片重命名

VBA可以完成该操作，试验一下如下两个代码。前者获取所有图片名称（.jpg）在A列，后者更改所有图片（按照B列）。

Sub GetPic()
Dim myFile As String
Dim myPic As String
Dim i As Single
i = 1
myFile = "C:\Users\xx\Desktop\新建文件夹\"
myPic = Dir(myFile & "*.jpg")
Do While Len(myPic) <> 0
Cells(i, 1) = myPic
i = i + 1
myPic = Dir
Loop
End Sub
Sub RenamePic()
Dim myFile As String
Dim myPic As String
Dim i As Single
i = 1
myFile = "C:\Users\xx\Desktop\新建文件夹\"
myPic = Dir(myFile & "*.jpg")
Do While Len(myPic) <> 0
Name myFile & myPic As myFile & Cells(i, 2)
i = i + 1
myPic = Dir
Loop