Excel命名

由于数据在EXCEL中，用VBA写是合乎逻辑的。VBA的优点是代码在EXCEL文件中，是一个友好的开发调试环境。可以一步一步执行代码，中间检查变量的值，方便修正程序。我最初编写了一个VBA代码，将文件保存为XLAM格式(一个带有脚本的文件)，然后按ALT+F11输入VBA。

代码文件如下(有可能浏览器会偷换特殊字符，所以一定要结合上图):

选项显式

子宏1()

模糊排列，I，j，p，f

arr = ActiveSheet。使用范围

对于i = 2到下界(arr)

文件重命名

p = " f:\ downloads \ 1 \ " & amp；arr(i，1)

f = Dir(p & amp；"*.jpg”)

j = 1

而f & lt& gt""

名称p & ampf为p & amparr(i，2)和amparr(i，3)和amp强生公司。".jpg "

f =方向

j = j + 1

行

重命名文件夹

将p命名为p & amparr(i，2)

接下来我

末端接头