把EXcel里的名字批量导入文件，让其成为文件名

来源：百度知道 编辑：UC知道 时间：2024/06/14 00:05:52
我想问一下，学生名字都在EXCEL里面，一班一班，很详细，怎么把数码相机里的照片，批量一次性转成学生名，让照片上和姓名对称？
一个文件夹里的照片，一个EXCEl里的名字，把照片的名字从Excel里导入WIN新建文件夹！成批处理！

excel可不认识哪个学生叫什么名字

首先要保证学生照片的文件名是他自己的名字

那么就可以名字和图片对应了

具体情况要说清楚一点

不然没有人知道怎么回答的

这个是不同程序的调用，很有趣。你这样，将照片名按学号排好，学生名也按学号排好，先将表格定为1厘米高，2厘米宽，然后将所有照片插入excel中，选中编辑/定位/定位条件/对象，选中所有图，点右键，设图片格式/大小选 为1厚米高2厘米宽，不选锁定纵横比，就可以将所有图片做得一样大，并且与所有人员对应了。
现在唯一差是的，它们没有竖直方向对齐。我查一下再回复你

用VBA来处理，进行EXCEL按ALT+F11，输入以下代码！
Sub Macro1()
Dim objShell, objFolder
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.BrowseForFolder(0, "请选取文件夹", 0, 0)

With Application.FileSearch
.NewSearch
.LookIn = objFolder
.SearchSubFolders = True
.Filename = "*.JPG"
.MatchTextExactly = True
.FileType = msoFileTypeAllFiles
.Execute
If .Execute() > 0 Then
MsgBox "There were " & .FoundFiles.Count & _
" file(s) found."
For i = 1 To .FoundFiles.Count