如何轻松快速删除Excel中的空白行提升工作效率
1055
2022-12-02
excel中VBA提取文件夹名称的方法
文章介绍excel中使用VBA代码来提取文件夹名称的具体操作步骤。
在网上看到有人用批处理命令提取文件夹名称。其实在excel中使用VBA代码也同样可以提取文件夹名称。
比如需要将电脑E盘“论坛工作资料”文件夹下面的所有文件夹名称提取出来放在excel工作表的A列,可以使用下面的代码。
使用方法是:新建一个excel文档,按ALT+F11,打开VBE编辑器,单击插入——模块,将下面的代码复制到右边的代码编辑区,然后按工具栏中的“运行”按钮即可。
Sub 提取文件夹名称()Dim fs As Objectn = 1Set fs = CreateObject("Scripting.FileSystemObject")Set f = fs.getfolder("E:\论坛工作资料")For Each fd In f.subfoldersCells(n, 1) = fd.Namen = n + 1NextSet f = NothingSet fs = NothingEnd Sub
下面是VBE编辑器中写入的提取文件夹名称相关的一个截图演示:
举一反三,如果需要提取F盘下面文件夹名称,路径更改一下就OK。
版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。