咔片PPT · AI自动生成演示文稿，模板丰富、排版精美 讯飞智文 · 一键生成PPT和Word，高效应对学习与办公
  • 系统环境：Windows 10
  • Excel：2010版本


在操作电脑的过程中，时常伴随着这样的动作：新建文件夹、新建文件、删除文件夹、删除文件等。那么怎么让VBA实现，隆重介绍FileSystemObject，简称FSO


Part 1：FSO简介

    • FSO，文件系统对象，主要功能就是对文件或者文件夹的一系列操作。默认情况下VBA中无法使用，需要先进行创建（这里介绍后期绑定的方法）
    • 作为一个对象，自然具有对象两大特性：属性、方法
    • 属性可理解为对象的静态特性，类似于对象.Name=”新名字”
    • 方法可理解为对象的动态特性，类似于创建文件夹这一动作

后期绑定

Set objFSO = CreateObject("Scripting.FileSystemObject")


Part 2：文件夹操作

  • 文件夹删除，其中NewFolderName为文件夹绝对路径

objFSO.DeleteFolder (NewFolderName)


  • 文件夹新建

Set myfolder = objFSO.createfolder(NewFolderName)


Part 3：实例

  • 检查当前文件夹是否存在测试文件夹，存在则删除，并新建文件夹
  • 该功能用于文件夹初始化

Sub test() Set objFSO = CreateObject("Scripting.FileSystemObject") NewFolderName = ThisWorkbook.Path & "" & "测试" If objFSO.FolderExists(NewFolderName) Then objFSO.DeleteFolder (NewFolderName) Set myfolder = objFSO.createfolder(NewFolderName) Else Set myfolder = objFSO.createfolder(NewFolderName) End If End Sub


图1 新建文件夹前



图2 新建文件夹


以上，为本次的介绍内容，下回见。

本文首发于微信公众号：Excel高效办公之VBA。排版和细节略作修改，发于头条