如何用电子表格给图片批量明名

⑴ 如何把照片名称批量导入excel

1、打开电脑，首先在指定盘符中新建一个文件夹，并把需要导入到excel中图片复制到该文件夹内；

⑵ 有一个表格和一堆照片，怎么批量把表格里的名字命名到图片

你可以参考这个方式来修改网页链接，里面有软件直接下载可以使用

⑶ 如何能批量导出excel内表格图片并命名

工具：Office2013

方法如下：

1. Excel中有如下图片，将之复制出来并保存重命名：

   
   

2. 

   
   4. 最后将图片文件重命名即可。

   ⑷ 关于如何利用EXCEL中的编号批量修改图片文件名

   可以用VBA来实现你要的功能，具体方法可以参考下面的来实现：
   
   1、首先建立一个EXCEL表 其中第一个工作薄名称为照相顺序表 如下图
   Sub 照片重命名()
   If MsgBox("程序将重命名与本工作薄同目录下的所有照片文件，确认这样做么？", vbYesNo) <> 6 Then
   Exit Sub
   End If
   Dim oldname As String '旧文件名变量oldname
   Dim newname As String '新文件名变量newname
   Dim photopath As String '路径变量photopath
   Dim nophoto As String '错误提示变量nophoto
   Dim i As Integer '循环变量i
   photopath = ThisWorkbook.Path '为要修改的文件名路径复制为当前excel文件的路径
   For i = 2 To Worksheets("照相顺序表").Range("a65536").End(xlUp).Row '开始循环 从“照相顺序表”工作薄的a2单元格开始
   '为新文件名变量赋值为路径变量& \ & 照相顺序表工作薄中的a2&b2单元格内容加上扩展名.jpg
   newname = photopath & "\" & Worksheets("照相顺序表").Cells(i, 1).Text & Worksheets("照相顺序表").Cells(i, 2).Text & ".jpg"
   '为旧文件名变量赋值为路径变量& \ & 照相顺序表工作薄中的c2单元格内容&扩展名.jpg
   oldname = photopath & "\" & Worksheets("照相顺序表").Cells(i, 3).Text & ".jpg"
   '判断旧文件名是否在当前目录存在
   If Dir(oldname) <> "" Then
   Name oldname As newname '存在则改名
   Else
   nophoto = nophoto & Chr(10) & oldname‘不存在则将其赋值给错误提示变量并以回车分割累加
   End If
   Next i
   If nophoto <> "" Then
   MsgBox nophoto & Chr(10) & "图片不存在" ’存在错误提示则弹出错误提示框
   End If
   End Sub