室内设计培训
平面设计培训
部落窝教育
网站首页 >> Excel教程 >> 文章内容

vba提取文件名的操作流程和代码介绍

[日期:2012-10-17]   来源:IT部落窝  作者:IT部落窝   阅读:1197[字体: ]
内容提要:文章介绍excel中使用vba提取文件名的操作步骤。根据需要自行修改vba提取文件名的路径和存放单元格即可。

  在excel中使用VBA编写代码,可以轻松的提取某个文件夹下面的所有文件名。

  比如笔者在F盘下面建立了一个文件夹,文件夹的名称是:IT部落窝,现在想将“IT部落窝”这个文件夹下面的所有文件名提取出来放在当前工作表的C列。

  具体的vba提取文件名的操作如下:

  1.按下ALT+F11,打开VBE编辑器。

  2.执行“插入——模块”,插入模块1。
 
  3.在右边的代码编辑窗口,复制下面的代码,然后单击“绿色箭头”或者快捷键F5键,运行代码。
Private Sub vba提取文件名()
    Dim FileName As String
    Dim i As Long
    i = 0
    Range("C:C").ClearContents
    Do While FileName > ""
        i = i + 1
        Cells(i, 3) = FileName
        FileName = Dir
    Loop
End Sub
 
 
vba提取文件名
IT部落窝PS,CDR,213班 分享到: QQ空间 新浪微博 腾讯微博 人人网
photoshop教程
Photoshop教程
平面设计教程
Photoshop教程