當前位置:首頁 » 表格製作 » 怎樣將圖片名稱導入到表格里

怎樣將圖片名稱導入到表格里

發布時間: 2025-01-23 13:37:11

1. 如何將大量圖片的名稱編輯到一張EXCEL表格中

1、直接復製法

  • 進入文件夾

  • 全選圖片文件

  • shift+右鍵>復制為路徑

  • 粘貼到Excel中

注意,此時復制到excel中的包括圖片的路徑,可通過替換為空值的方法批量刪除。

2、VBA法

復制如下代碼到VBA模塊中,運行即可。

SubPic_name()
DimmyPathAsString
DimmyPicAsString
DimiAsSingle
i=1
WithApplication.FileDialog(msoFileDialogFolderPicker)
.Show
.AllowMultiSelect=False
myPath=.SelectedItems(1)
EndWith
myPic=Dir(myPath&""&"*.jpg")
DoWhileLen(myPic)<>0
ActiveSheet.Cells(i,1)=myPic
i=i+1
myPic=Dir
Loop
EndSub