A. 关于如何利用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
B. 如何借助Excel对图片进行批量改名
有时我们图片的命名很乱,想要统一批量修改为一致的或者排序型的,有网友可能想到用脚本命令,其实用excel也能完成,下面就给大家介绍利用Excel来实现按照编号快速修改人名文件的方法。
补充:excel常用Ctrl组合快捷键
Ctrl+A全选
Ctrl+C复制
Ctrl+X剪切
Ctrl+V粘贴
Ctrl+D自动填充
Ctrl+B加粗
Ctrl+U下划线
Ctrl+I斜体
Ctrl+K超链接
Ctrl+F查找
Ctrl+H替换
Ctrl+L创建表
Ctrl+N新建工作簿
Ctrl+O打开文件
Ctrl+P打印
Ctrl+S保存
Ctrl+W关闭
Ctrl+Y撤销后重做
Ctrl+Z撤销
相关阅读:excel不常用的重要技巧
1.怎样快速打开设置单元格格式
我们经常在输入数值等的时候需要设置单元格格式,很多人都已经习惯了点击鼠标右键选项,但是我们可以使用快捷键CTRL加1快速打开,如果自己的手不在鼠标上非常方便。
当然,我们也可以用鼠标点击如下图所示位置快速打开设置单元格格式选项。
2.excel怎样设置小数位数
如果一行带小数的数字我们要快速转化为整数的话可以使用快捷键CTRL加SHIFT加1,设置起来速度非常快。
当然,我们经常不会只使用整数,小数位的缩进或者延伸我们可以选中要设置的单元格后使用点击下面两个选项进行设置。
3.关闭excel表的快捷方式
我们经常需要打开一个表格完成工作后需要关闭,可以使用快捷方式CTRL加W,使用习惯后比较方便,希望能够对大家有帮助。
C. 如何能批量导出excel内表格图片并命名
工具:Office2013
方法如下:
Excel中有如下图片,将之复制出来并保存重命名:
4. 最后将图片文件重命名即可。