Excel VBA 删除文件夹 - VBA

简介

本文将介绍如何使用 Excel VBA 编写程序来删除文件夹。我们将使用 VBA 内置的 FileSystemObject 类来实现文件夹的删除操作。

步骤

以下是删除文件夹的基本步骤：

1. 创建 FileSystemObject 对象。
2. 使用对象的 DeleteFolder 方法删除文件夹。

下面是具体的代码实现：

Sub DeleteFolder()
    Dim fso As Object
    Dim folderPath As String
    
    ' 文件夹路径
    folderPath = "C:\Path\To\Folder"
    
    ' 创建 FileSystemObject 对象
    Set fso = CreateObject("Scripting.FileSystemObject")
    
    ' 删除文件夹
    fso.DeleteFolder folderPath, True
    
    ' 释放对象
    Set fso = Nothing
End Sub

说明

• 在上述代码中，我们首先声明了一个 fso 变量，用于代表 FileSystemObject 对象。
• 然后，我们指定要删除的文件夹的路径，将其赋值给 folderPath 变量。
• 接下来，使用 CreateObject 函数创建 FileSystemObject 对象，并将其赋值给 fso 变量。
• 最后，通过 DeleteFolder 方法删除指定路径的文件夹。我们还传入了 True 参数，表示删除文件夹及其内容。
• 最后，我们释放 fso 对象，确保资源被正确释放。

注意事项

• 确保指定的文件夹路径是正确的，否则将无法删除文件夹。
• 删除文件夹后，无法恢复已删除的文件和文件夹，请谨慎操作。

希望本文对你使用 Excel VBA 删除文件夹有所帮助！