文件夾名導出為excel

① 如何把一個文件夾里的所有文件名全部導到EXCEL表格裡面去

今天工作中遇到一個問題，想把一個文件夾下的所有文件名，導入到excel里，如果一個個復制，工程太大了，搜索了一下，還真有類似的技巧可以實現，分享出來給大家用一個簡單的DOS命令就可以實現了!命令格式如下:dir
[drive:][path]
/b
>
[drive:][path]filename應用實例1：把D盤test目錄下所有文件名導到temp.xls里,只要在cmd窗口裡輸入dir
D:\test
/b
>
temp.xls
這樣就在你的當前目錄生成一個temp.xls的EXCEL文件,打開來就看到D盤test目錄下的所有文件名了,並且都帶有擴展名的。當你需要導到是txt記事本，那就改成temp.txt啰。如何把多個目錄下的所有文件名都導入到temp.xls里，把命令稍作改動就可以了。
命令格式如下：
dir
[drive:][path]
/b
>>
[drive:][path]filename應用實例2:把D盤test目錄、mp3目錄、E盤music目錄下的所有文件名存到temp.xls里，只要在cmd窗口裡輸入
dir
d:\test
/b
>>
temp.xls
dir
d:\mp3
/b
>>
temp.xls
dir
e:\music
/b
>>
temp.xls
這樣就在你的當前目錄生成一個temp.xls的EXCEL文件,打開來就看到以上三個目錄下的所有文件名了,並且都帶有擴展名的。

② 怎麼把多個文件名稱轉成表格

1. 如何將多個文件夾名稱導入Excel表格中
舉例說明：如果需要把」c:\windows「目錄下的百文件夾名轉到excel表裡度

1、點擊「開始——》運行」，輸入「cmd」回車，出現問控制台界面；

2、在控制台界面輸入DOS命令「dir c:\windows > c:\1.txt"回車，」答c:\windows「目錄下版的所有文件名都輸出到」c:\1.txt"文本文件中去權了；

3、將」c:\1.txt"文本文件內容復制、粘貼到excel表格中去。

2. 如何將word中多個表格轉為excel表格
方法/步驟

1

打開有需要轉換工作表的word文檔，將滑鼠游標移到表格中任意一格。

2

點擊表格右下角的「口」字形，就選中了整個表格。

3

然後在表格中任意位置右鍵單擊，在快捷菜單中選擇「復制」。

4

打開excel文檔，然後在單元上頌肆右鍵單擊，在快捷菜單中選擇「選擇性粘貼」。

5

在「選擇性粘貼」對話框中，粘貼方式選擇「文本」。

6

然後點擊「確定
3. 一個word文件中有多個表格,如何把它們變成一個表格一個文檔,而且
把多個word表格文件轉換到一個excel文件里：

1、首先在Word文檔中選擇「文件→另存為」，在文件類型中選擇「*」;

2、打開Excel，選擇「數據→導入外部數據→導入數據」，在」選擇數據源」對話框中選擇剛剛保存的HTM文件；

3、單擊「打開」。在「新建Web查詢」窗口中點擊你要導入的表格數據前面的黃色「箭頭」標記；

4、最後選擇「導入」，並選擇「數據的放置位置」即可。
4. excel怎麼把多個文件合並成一個
如果表不算太多的話可以試試這種方法，打開總表（要粘貼的表），打開一個要復制的表，右擊要復制的工作表標簽，選擇移動或復制工作表，建立副本，選擇要移動到表（要粘貼的那總表）。這種方法對合並到同一個文件中還是可行的。

但你說的匯總到一張表裡就不行了，可以試試用「=」建立鏈接（要用相對地址），但這種方法對表結構相同或類似的才可以，而且文件名和表名稱要有規律。這樣會很快匯總到一張表中，稿櫻敗下面的活兒就是整理一下的工作了，要是要數據的話就把鏈接改成數據才可以，這種方法好在可以動態更新你的數據。

寫代碼也可以，但若是工作量很大的話可考慮！

新建一個工作表，命名後保存到和與合並的100個文件同一個文件文件夾，摁 alt + f11，雙擊工程資源管理器裡面的sheet1(sheet1)，在右側的代碼區粘貼如下代碼。運行。等候一會就OK了。

Sub 合並鍵顫當前目錄下所有工作簿的全部工作表（）

Dim MyPath, MyName, AWbName

Dim Wb As Workbook, WbN As String

Dim G As Long

Dim Num As Long

Dim BOX As String

Application.ScreenUpdating = False

MyPath = ActiveWorkbook.Path

MyName = Dir(MyPath & "\" & "*.xls")

AWbName = ActiveWorkbook.Name

Num = 0

Do While MyName ""

If MyName AWbName Then

Set Wb = Workbooks.Open(MyPath & "\" & MyName)

Num = Num + 1

With Workbooks(1).ActiveSheet

.Cells(.Range("A65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)

For G = 1 To Sheets.Count

Wb.Sheets(G).UsedRange.Copy .Cells(.Range("A65536").End(xlUp).Row + 1, 1)

Next

WbN = WbN & Chr(13) & Wb.Name

Wb.Close False

End With

End If

MyName = Dir

Loop

Range("A1").Select

Application.ScreenUpdating = True

MsgBox "共合並了" & Num &； "個工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation， "提示"

End Sub

③ 如何批量提取文件名到EXCEL表

打開EXCEL的數據-查詢功能-新建查詢-從文件-從文件夾

選擇文件夾路徑，這樣，就有一個窗口顯示內文件詳細信息，然後容點擊載入，你需要的文件名等信息就會導入到EXCEL表裡了。

比起用BAT文件來說這樣更快，效率更高，更便捷，不要記住那麼繁瑣的bat命令行。

④ 批量提取文件名到excel

任意命名一個文件,重點是將文件的後綴改為bat的腳本文件。滑鼠右擊選擇編輯,在文件中輸入命令dir /b > name.csv。雙擊運行這個文件,你會發現多了一個叫name.csv的文件。打開name.csv這個文件發現這個些文件名就已經導入到Excel里了，詳細步驟：

1、打開需要提取文件名的目錄。