
如何将文件夹中的许多JPEG图片名称倒入到EXCEL文档。
我的意思是说将大量图片的名称编辑到一张EXCEL表格中,有没有快速的方法,谢谢各位高手的回答!...
我的意思是说将大量图片的名称编辑到一张EXCEL表格中,有没有快速的方法,谢谢各位高手的回答!
展开
4个回答
展开全部
按ALT+F11打开VBA编辑器,点“插入”-“模块”(只保留一个工作本,其它关掉),将下列内容复制过去
Sub 提取文件名称()
a = Trim(Cells(1, 1))
b = a & "\*.jpg"
c = Dir(b)
d = 4
Do While c <> ""
Worksheets("提取文件名称").Cells(d, 1) = Trim(c)
d = d + 1
c = Dir()
Loop
End Sub
以下不要复制
然后在工作表的A1单元格输入文件夹地址
点工具-宏-宏,在左边选择“提取文件名称”,点执行就可以了
如不行,需打开宏-安全性-安全性改为中或低
Sub 提取文件名称()
a = Trim(Cells(1, 1))
b = a & "\*.jpg"
c = Dir(b)
d = 4
Do While c <> ""
Worksheets("提取文件名称").Cells(d, 1) = Trim(c)
d = d + 1
c = Dir()
Loop
End Sub
以下不要复制
然后在工作表的A1单元格输入文件夹地址
点工具-宏-宏,在左边选择“提取文件名称”,点执行就可以了
如不行,需打开宏-安全性-安全性改为中或低
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
在工具栏上的插入-对象-由文档创建-游览-选择您要插入的图片即可,
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询