Excel如何用VBA批量提取文件名？

1、如下图所示，F盘下的一个文件夹中有很多Excel文件，先将所有文件的文件名提取到Excel中。

2、打开Excel，按下Alt+F11，在VBA界面中双击左侧数据保存的工作表，弹出代码编辑区，如下图所示。

3、输入代码：

Sub 鱼木混猪()

代码作用是将F盘下的指定文件夹中所有xlsx文件提取到Excel中的B列中，如下图所示。

4、将光标定位于代码中间，点击“运行子程序”，如下图所示。

5、返回Excel，可以看到所有文件名都被提取到B列中了，如下图所示。

1、1.打开Excel；

2.按下Alt+F11，双击工作表名；

3.输入代码，核心代码：

f = Dir("F:\鱼木混猪\*.xlsx")

4.点击“运行子程序”；

5.所有xlsx格式的文件名就被提取到Excel中了。