Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具,再加上成功的市场营销,使Excel成为最流行的个人计算机数据处理软件。 文章介绍excel中使用vba提取文件名的操作步骤。根据需要自行修改vba提取文件名的路径和存放单元格即可。 在excel中使用VBA编写代码,可以轻松的提取某个文件夹下面的所有文件名。 比如笔者在F盘下面建立了一个文件夹,文件夹的名称是:本站,现在想将“本站”这个文件夹下面的所有文件名提取出来放在当前工作表的C列。 具体的vba提取文件名的操作如下: 1.按下ALT+F11,打开VBE编辑器。 2.执行“插入——模块”,插入模块1。? 3.在右边的代码编辑窗口,复制下面的代码,然后单击“绿色箭头”或者快捷键F5键,运行代码。Private Sub vba提取文件名()? ? Dim FileName As String? ? Dim i As Long? ? FileName = Dir("F:\本站\*.*")? ? i = 0? ? Range("C:C").ClearContents? ? Do While FileName > ""? ? ? ? i = i + 1? ? ? ? Cells(i, 3) = FileName? ? ? ? FileName = Dir? ? LoopEnd Sub? 4.关闭VBE窗口,回到工作表中,可以在C列看到F盘“本站”文件夹下面所有的文件名全部罗列在C列了。? 关于上面的vba提取文件名的代码,请在实际使用时,根据需要修改提取文件名的路径(F:\本站\*.*),以及存放在C列的位置(Cells(i, 3))。![]() Excel整体界面趋于平面化,显得清新简洁。流畅的动画和平滑的过渡,带来不同以往的使用体验。 |
温馨提示:喜欢本站的话,请收藏一下本站!