提示:其它语言是由 Google 机器翻译的。 你可以访问 English 版本。
登录
x
or
x
x
马上登记
x

or

如何快速列出文件夹的图片名称/文件名到Excel单元格?

在本教程中,我将提供一些技巧,以快速列出Excel工作表中特定文件夹的所有图片名称或文件名,如屏幕截图所示。

快速导航

使用VBA列出Excel中文件夹的图片名称
使用文件名列表在Excel中列出文件夹的图片名称或特定格式文件名
下载示例文件

doc list图片名称1

使用VBA列出Excel中文件夹的图片名称

在Excel中,没有内置函数可以自动列出您在工作表单元格中选择的文件夹的所有图片名称,但在这里我有一个VBA代码可以帮助您快速解决此问题。

1。 在Excel中,然后按 + 键打开 Microsoft Visual Basic for Applications 窗口。

2。 在弹出窗口中,单击 插页 > 模块 创建一个新的模块脚本。

3。 复制下面的代码并将它们粘贴到新的模块脚本窗口。

Sub PictureNametoExcel()'UpdatebyExtendoffice Dim I As Long Dim xRg As Range Dim xAddress as String Dim xFileName As String Dim xFileDlg As FileDialog Dim xFileDlgItem As Variant On Error Resume Next xAddress = ActiveWindow.RangeSelection.Address Set xRg = Application.InputBox(“Select放置名称列表的单元格:“,”Kutools For Excel“,xAddress ,,,,, 8)如果xRg为Nothing则退出Sub Application.ScreenUpdating = False设置xRg = xRg(1)xRg.Value =”图片名称“使用xRg.Font .Name =“Arial”.FontStyle =“Bold”.Size = 10 End with xRg.EntireColumn.AutoFit Set xFileDlg = Application.FileDialog(msoFileDialogFolderPicker)I = 1 if xFileDlg.Show = -1 then xFileDlgItem = xFileDlg .SelectedItems.Item(1)xFileName = Dir(xFileDlgItem&“\”)Do while xFileName <>“”如果是InStr(1,xFileName,“.jpg”)+ InStr(1,xFileName,“。png”)+ InStr (1,xFileName,“。img”)+ InStr(1,xFileName,“。ioc”)+ InStr(1,xFileName,“。bmp”)> 0然后xRg.Offset(I).Value = xF ileDlgItem&“\”&xFileName I = I + 1 End if xFileName = Dir Loop End If Application.ScreenUpdating = True End Sub

4。 按 F5 键,然后会弹出一个对话框供您选择要放置图片名称的单元格。
doc list图片名称1

5。 点击 OK 继续选择要在“浏览”对话框中列出图片名称的文件夹。
doc list图片名称3

6。 点击 OK,现在所选文件夹中的所有图片名称都已在Excel中列出。
doc list图片名称13

请注意: 在VBA代码中,您可以在代码字符串中使用jpg / png / .... 如果InStr(1,xFileName,“.jpg”)+ InStr(1,xFileName,“。png”)+ InStr(1,xFileName,“。img”)+ InStr(1,xFileName,“。ioc”)+ InStr (1,xFileName,“。bmp”) > 0然后 您需要的文件扩展名,例如,如果要以doc格式列出文件的文件名,只需将代码字符串更改为 如果InStr(1,xFileName,“。doc”)> 0则。

如果您通常需要在日常工作中在Excel单元格中列出文件夹的一个或所有格式的文件名,则代码很复杂且不易处理,但是,通过以下方式,您可以快速解决此问题。


移动

您是否想要加薪并且有更多时间陪伴家人?

Office选项卡通过50%在Microsoft Office中立即提高您的工作效率

难以置信,在两个或更多文档上工作比在一个文档上工作更容易,更快捷。

与众所周知的浏览器相比,Office Tab中的选项卡式工具功能更强大,效率更高。

每天为您减少数百次鼠标点击和键盘输入,现在告别鼠标手。

如果您通常使用多个文档,Office Tab将为您节省大量时间。

30-day免费试用,不需要信用卡。

了解更多现在免费下载


使用文件名列表在Excel中列出文件夹的图片名称或特定格式文件名

这是一个实用程序 - 文件名列表 in Kutools for Excel,这可以

>>列出新工作表中文件夹的所有文件格式的所有文件名;

>>以您指定给Excel的一种或多种文件格式列出文件名;

>>列出文件名,包括Excel的子文件夹和隐藏文件和文件夹。

现在告别老鼠手和颈椎病

Kutools for Excel的300高级工具可在几秒钟内完成80%Excel任务,让您从数千次鼠标点击中脱颖而出。

轻松应对1500工作场景,无需浪费时间搜索解决方案,有充足的时间享受生活。

每天为80 +高效人士提高110000%的工作效率,当然包括您。

不再受痛苦的配方和VBA的折磨,让你的大脑休息和愉快的工作情绪。

60天免费试用版具有全部功能,60天退款无理由。

更好的身体创造更美好的生活。

免费安装Kutools for Excel后,请执行以下操作:

1。 启用要列出文件名的工作簿,然后单击 Kutools Plus > 进出口 > 文件名列表.
doc list图片名称4

2。 在里面 文件名列表 对话框,首先点击 doc list图片名称5 要选择要列出其文件名的文件夹,可以选中复选框 将文件包含在子目录中 包含隐藏的文件和文件夹 如你所需。
doc list图片名称6

3。 然后选择要列出名称的文件格式 文件类型 部分。

单向阀 所有文件 选项,它将列出所选文件夹中所有文件格式的所有文件名
doc list图片名称7
单向阀 常见 选项,并从下拉列表中选择要列出文件名的特定文件格式,然后它将列出您在下拉列表中选择的文件格式的所有文件名
doc list图片名称8
单向阀 指定 选项,然后键入文件扩展名(使用逗号分隔它们)您要在文本框中列出文件名,然后它将仅列出Excel中输入文件扩展名的文件名
doc list图片名称9

4。 根据需要从下拉列表中选择尺寸单位 文件大小单位 如果要创建文件名的链接,请检查 创建超链接 选项。

doc list图片名称10 doc list图片名称11

5。 点击 Ok,将创建一个新工作表以列出文件名和一些文件信息。
doc list图片名称12

提示: 如果要在Excel中列出所有工作表名称,可以应用Kutools for Excel' 创建图纸名称列表 实用程序,它将创建一个新工作表以列出所有可链接的工作表名称。
创建工作表名称列表

Kutools for Excel:200 +有用的便捷工具,只需点击几下即可将Excel中复杂的任务简化。


下载示例文件

样品


如何让你从人群中脱颖而出,轻松工作,悠闲地享受生活?

Kutools for Excel每天平均提高您的80%效率,让您有更多时间陪伴家人,享受生活乐趣。

300高级工具解决了80%Excel问题,您不再难以搜索解决方案,更轻松地完成工作。

轻松处理1500 Excel场景,每天至少为您节省1小时。

成为5会议纪要的Excel专家,获得人们的认可和晋升机会。

一键式实用程序处理批处理,让您避免数千次鼠标点击,再说一下鼠标手。

摆脱死记硬背的公式和复杂的VBA,让你的大脑休息。

110000 +高效率官员和300 +世界知名公司的选择。

只需花费$ 39,但比其他人的4000培训更值钱

60天免费试用,没有任何限制,全额退款至60天,无任何理由。


推荐的生产力工具

Office选项卡 - 选项卡式浏览,编辑,管理Microsoft Office 2019中的文档 - 2003和Office 365


办公室标签

用于加速Excel 2019-2007的专业加载项,将小时任务缩小到秒

此加载项包括数十个专业组,300 +选项将自动完成Excel中的大部分日常任务,并至少提高50%的生产力。 例如一键式按钮组和批量转换。
现在,您有机会通过Kutools for Excel加速自己!


Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    THE HELPER · 1 years ago
    I WAS HAVING THE SAME PROBLEM TANNER, IN THE SCRIPT WHERE IT HAS THE DIFFERENT FILE EXTENSIONS ITS GOING TO GRAB,YOU HAVE TO CAPITALIZE THE FILE EXTENSION ITS LOOKING FOR, FOR EXAMPLE, YOU SAID YOUR FILES ARE ".png", WELL IF YOU CAPITALIZE IT I.E ".PNG" IT MAY WORK.
  • To post as a guest, your comment is unpublished.
    Tanner Haynes · 1 years ago
    Is it possible that there is something wrong with the code? The file explorer is showing my folder full of images (.png) as empty.
  • To post as a guest, your comment is unpublished.
    Tanner · 1 years ago
    Is it possible something is wrong with the code? Because it shows folders full of images (.png) as empty when it pulls up the box to select the photos.