使用Excel实现我电脑硬盘里面某个文件夹下的所有的文件列表。

发布网友 发布时间：2022-05-10 13:13

我来回答

共5个回答

热心网友 时间：2023-10-10 00:37

你说的excel宏语言我不会，不过你可以先使用DOS命令生成文本文件txt，再转化为excel文件

第一步：使用DOS命令中的dir就可以生成这样的文本文件。下面介绍具体操作方法。
1.这里假设文件夹为为D:\123。
2.以Windows XP操作系统为例，单击“开始|运行”，输入cmd，然后单击“确定”。
3.在命令提示符窗口中输入以下命令，dir d:\123 >c:\filelist.txt
这样就在C:盘根目录下生成了一个名为“filelist.txt”的文本文件，该文件中即包含文件夹D:\123 里面的所有文件的详细列表。
如果希望将D:盘中子目录中的文件和文件夹列表也全部列出来，可以在命令提示符窗口中输入以下命令。dir d:\ /s >c:\filelist.txt

如果使用下面的命令，即加一个/b，则会生成一个简单的文件名列表，不包括其它信息，这种方法可能更加实用一些。dir d:\ /s /b >c:\filelist.txt

第二步：转化为excel文件
1、打开excel，“数据”菜单中的“导入外部数据”，然后“导入数据”
2、打开要导入的文本文件
3、在文本导入向导-3步骤之1中选择“固定宽度。。。”，然后“下一步”
4、在“数据预览”框中用鼠标单击想要分列位置，即想在什么位置分为一列，然后“下一步”，然后“完成”
5、去掉制表位符号，可采用替换操作。

热心网友 时间：2023-10-10 00:37

将路径得到到EXCEL中即可，如果想要自动化的，可以给你用批处理实现。追问好几千个文件啊，如果手动可以的话，我至于提这个问题吗？如果你会实现，用其他方法实现也可以。

热心网友 时间：2023-10-10 00:38

假设文件夹是D:\123，然后将所有文件名放入Excel A列中
代码及注释如下：
Sub main()
f = Dir("D:\123\*.*")'搜索D盘123文件中的所有文件
Do While f <> ""
x = x + 1
Range("A" & x) = f'将文件全名，依次放入A列中
f = Dir
Loop
End Sub

热心网友 时间：2023-10-10 00:39

先导出为TXT文件，然后针TXT在EXCEL中打开，稍微加工一下就OK啦，我经常这样做，很方便的。

热心网友 时间：2023-10-10 00:39

你说的这个只能用宏语言实现，我这向天也在研究这个，但现在还没有实现，我看过别人做过，我学好了给你看效果，就是一个文件夹有若干个子文件夹，每个子文件夹内若干文件，但每个文件命名规则必须一致，这样每次放入文件夹文件后，在excel文件里会自动增加目录，也可以实现文件编号重号和漏号提醒功能，且在excel文件中可链接打开目录对应文件，若有问题可加我1940186947