Question

如何把文件夹名字批量导入excel

如图，有许多这样的文件夹，需要把文件夹名称全部输入excel中去，有什么办法，苹果电脑，装有windows系统，查网上cmd dir那个，在windows系统上也没有成功，求高手解答，跪谢~

Answer 1

使用“文件名提取器[单文件版]V2.0 绿色版”一类的软件，把文件夹的名字提取出来到txt文件里面，然后再把txt文件导入excel 步骤如下：
1、首先，打开excel，选择数据选项卡，自文本选项。
2、在弹出的资源管理器界面选择存放好的txt文件后，点击打开按钮。
3、此时弹出文本导入向导，由于我的数字是以空格为分隔字符的，所以我选择分隔符号，当然，如果你的文本是固定宽度，你可以选择第二个。然后点击下一步按钮。
4、勾选空格，检验预览数据是否和自己预想的一致。一致后继续点击下一步按钮。
5、查看预览效果。并选择列数据格式，此处没什么特别要求，建议选择常规，常规也是excel默认的格式。点击完成。
6、在弹出的对话框中，选中要导入的数据区域，此处我要导入到当前单元格，并且从a1单元格开始，因此我选择a1单元格，多余的数据会自动以此单元格向两边张开。点击确定按钮
我们的数据就算是完美的导入进来了。

Answer 2

VBA代码如下：

Sub test()
mpath = "C:\测试\"     '将 C:\测试\改为父文件夹路径
fx = Dir(mpath & "*.*", vbDirectory)
Do While fx <> ""
    If GetAttr(mpath & "\" & fx) = vbDirectory Then
    Debug.Print fx
    End If
fx = Dir
Loop
End Sub

Answer 3

用vba是非常容易做到的.
看下私信.