Skip to main content

如何將資料夾及其子資料夾中的所有文件名稱列出到工作表中?

Author: Tech Support Last Modified: 2025-05-12

如果您需要從目錄生成文件名列表並導入Excel工作表,以下方法可以幫助您快速高效地完成此操作。選擇最適合您需求的方法。


使用網頁瀏覽器將資料夾中的所有文件名稱列至工作表

如果您想通過網頁瀏覽器列出資料夾中的文件,應確保您的電腦已安裝其中一款網頁瀏覽器(Firefox、Opera 和 Google Chrome)。假設您需要在工作表中列出以下資料夾的文件,請參見截圖:

1. 在資源管理器中複製資料夾("Folder Test")的路徑。例如,該資料夾的路徑為:"C:\Users\AddinTestWin10\Desktop\Folder Test"

2. 打開其中一款網頁瀏覽器(FireFox、Opera 和 Google Chrome),將資料夾路徑粘貼到地址欄中,然後按Enter鍵。請參見截圖:

A screenshot of folder path pasted in a browser's address bar

3. 點擊「Ctrl+A」全選網頁瀏覽器中的所有內容,然後按「Ctrl+C」進行複製。

4. 打開Excel並直接粘貼(使用「Ctrl+V」快捷鍵粘貼)到工作表中。請參見截圖:

A screenshot of files listed from a folder pasted into an Excel worksheet

注意事項:
  • 1. 使用此方法只能顯示主資料夾中的文件,無法列出子目錄中的文件。
  • 2. 文件名的超連結不可用。

使用公式將資料夾中的所有文件名稱列至工作表

在Excel中,您還可以使用公式從資料夾中獲取所有文件名或特定類型文件名的列表,請按照以下步驟操作:

1. 將文件路徑複製並粘貼到一個單元格中,然後在文件路徑後輸入 \* ,如下截圖所示:

2. 然後,點擊「公式」>「名稱管理器」,請參見截圖:

A screenshot showing the Formula Name Manager in Excel

3. 在「名稱管理器」對話框中,點擊「新建」按鈕,請參見截圖:

A screenshot of New Name dialog box in Excel with the New button highlighted

4. 在彈出的「新建名稱」對話框中,在「名稱」文本框中指定一個名稱,然後在「引用位置」文本框中輸入以下公式,請參見截圖:

=FILES(Sheet1!$A$1)

注意:在此公式中,"Sheet1!$A$1" 是包含您在步驟1中插入的文件路徑的工作表單元格。

A screenshot of creating a new name range in Excel

5. 然後,點擊「確定」>「關閉」以關閉對話框,然後在您想要列出文件名的空白單元格中輸入以下公式,並向下拖動填充手柄直到出現空白單元格,現在,指定資料夾中的所有文件名都已列出,如下截圖所示:

=IFERROR(INDEX(Filenames,ROW(A1)),"")

注意:在此公式中,"Filenames" 是您在步驟4中創建的區域名稱,而 "A1" 是包含文件路徑的單元格。

A screenshot of a list of file names populated in Excel from a folder

注意事項:
  • 1. 如果您希望在文件關閉並重新打開後公式仍能正常運行,則應將此工作簿保存為「啟用宏的工作簿」格式。
  • 2. 如果您想列出具有特定擴展名的所有文件,例如列出所有docx文件名,在這種情況下,只需使用 *docx* 代替 *,同樣,對於xlsx文件,請使用 *xlsx*。

    An animation showing filtering for specific file types in Excel


使用VBA代碼將資料夾中的所有文件名稱列至工作表

使用以下VBA代碼將資料夾中的文件列至工作表:

1. 打開工作表,並點擊選擇您要放置文件名的單元格。

2. 在Excel中按住「ALT + F11」鍵,這將打開「Microsoft Visual Basic for Applications」窗口。

3. 點擊「插入」>「模組」,並將以下代碼粘貼到「模組」窗口中。

VBA代碼:將資料夾中的所有文件名稱列至工作表

Sub listfiles()
'Updateby Extendoffice
    Dim xFSO As Object
    Dim xFolder As Object
    Dim xFile As Object
    Dim xFiDialog As FileDialog
    Dim xPath As String
    Dim I As Integer
    Set xFiDialog = Application.FileDialog(msoFileDialogFolderPicker)
    If xFiDialog.Show = -1 Then
        xPath = xFiDialog.SelectedItems(1)
    End If
    Set xFiDialog = Nothing
    If xPath = "" Then Exit Sub
    Set xFSO = CreateObject("Scripting.FileSystemObject")
    Set xFolder = xFSO.GetFolder(xPath)
    For Each xFile In xFolder.Files
        I = I + 1
        ActiveSheet.Hyperlinks.Add Cells(I, 1), xFile.Path, , , xFile.Name
    Next
End Sub

4. 然後按F5鍵運行代碼,將彈出一個新的「瀏覽」窗口。選擇您想要列出文件名的資料夾。

A screenshot of the file browse window in VBA

5. 然後點擊「確定」,指定資料夾中的文件已帶有超連結地列至工作表中。請參見截圖:

A screenshot of file names listed with hyperlinks in Excel

注意:只有主資料夾中的文件名才能被列出。

使用Kutools將資料夾和子資料夾中的所有文件名稱列至工作表

「Kutools for Excel」的「檔名列表」功能可以輕鬆地從目錄生成工作表中的文件列表。

Kutools for Excel 提供超過 300 種進階功能,簡化複雜任務,提升創造力與效率。 結合 AI 能力,Kutools 能夠精準自動化任務,讓數據管理變得輕而易舉。Kutools for Excel 的詳細資訊...免費試用...

1. 打開Excel,點擊「Kutools Plus」>「匯入/匯出」>「檔名列表…」,請參見截圖:

2. 在「檔名列表」對話框中,執行以下操作:

A screenshot of Filename List dialog box options

(1) 點擊 A screenshot of the folder selection button in the Filename List dialog box 按鈕以指定包含您要列出的文件的資料夾;

(2) 勾選「包括子目錄中的文件」選項以列出所有子資料夾中的文件名,或勾選「包括隱藏文件和資料夾」選項以列出所有隱藏文件以及隱藏資料夾中的文件名;

(3) 在「文件類型」部分指定您要列出的文件類型;

(4) 從「文件大小單位」部分選擇您需要顯示的單位。

(5) 根據需要勾選「創建超鏈接」選項。

3. 點擊「確定」。它將在新工作表中生成目錄或子目錄中的文件列表。請參見截圖:

A screenshot of a complete file name list generated using Kutools

Kutools for Excel - 超過 300 種必備工具,讓 Excel 功能更強大。永久免費享受 AI 功能!立即獲取


更多相關文章:

  • 從工作簿中創建所有工作表名稱的列表
  • 假設您有一個包含多個工作表的工作簿,現在您想列出當前工作簿中的所有工作表名稱,是否有任何快速方法可以在Excel中創建這些工作表名稱的列表而無需逐一輸入?本教程將指導您如何在Excel中列出工作表名稱。
  • 根據列表從一個資料夾複製或移動文件到另一個資料夾
  • 如果您在工作表的一列中有文件名列表,並且這些文件位於您電腦中的某個資料夾中。但是,現在您需要將這些文件(其名稱已在工作表中列出)從原始資料夾移動或複製到另一個資料夾,如下截圖所示。如何在Excel中盡快完成此任務?
  • 使用下拉列表在工作表之間導航
  • 假設您有一個包含多個工作表的工作簿,現在您需要創建一個列出所有工作表名稱的下拉列表或組合框,當您從下拉列表中選擇一個工作表名稱時,它會立即跳轉到該工作表。本文將介紹如何在Excel中使用下拉列表在工作表之間導航。

最佳辦公效率工具

🤖 Kutools AI 助手:基於智能執行方式革新數據分析:智能執行   |  生成代碼  |  創建自訂公式  |  分析數據並生成圖表  |  調用 Kutools 函數
熱門功能查找、標記重複值或識別重複項   |  刪除空行   |  合併列或單元格而不丟失數據   |   四捨五入無需公式 ...
高級 LOOKUP多條件 VLookup    多值 VLookup  |   多表查找   |   模糊查找 ....
高級下拉列表快速創建下拉列表   |  依賴下拉列表   |  多選下拉列表 ....
列管理器添加特定數量的列  |  移動列  |  切換隱藏列的可見狀態  |  比較區域和列 ...
特色功能網格聚焦   |  設計檢視   |   增強編輯欄    工作簿與工作表管理器   |  資源庫(自動文本)   |  日期提取器   |  合併資料   |  加密/解密儲存格    按列表發送電子郵件   |  超級篩選   |   特殊篩選(篩選粗體/斜體/刪除線...) ...
頂級 15 種工具集12 個文本工具添加文本刪除特定字符、...)   |   50+ 圖表 類型甘特圖、...)   |   40+ 實用 公式基於生日計算年齡、...)   |   19 個插入工具插入QR碼根據路徑插入圖片、...)   |   12 個轉換工具金額轉大寫匯率轉換、...)   |   7 個合併與分割工具高級合併行分割儲存格、...)   |   ... 還有更多

使用 Kutools for Excel 提升您的 Excel 技巧,體驗前所未有的高效。 Kutools for Excel 提供超過 300 種高級功能來提高生產力並節省時間。  點擊這裡獲取您最需要的功能...


Office Tab 將標籤式界面帶到 Office,讓您的工作更加輕鬆

  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中啟用標籤式編輯和閱讀。
  • 在同一窗口的新標籤中打開和創建多個文檔,而不是在新窗口中。
  • 將您的生產力提高 50%,每天為您減少數百次鼠標點擊!