VBA 删除文件 - VBA

在 VBA 中，可以使用 Kill 函数来删除本地计算机上的文件。该函数需要指定要删除的文件的完整路径和文件名。

下面是一个简单的示例代码：

Sub DeleteFile()
    Dim filePath As String
    filePath = "C:\example.txt"
    Kill filePath
End Sub

在这个例子中，我们定义了一个名为 filePath 的字符串变量，表示要删除的文件的完整路径和文件名。然后，使用 Kill 函数删除此文件。

注意，使用 Kill 函数删除文件时，无法将文件移到回收站。一旦执行 Kill 函数，文件就会立即永久删除。

如果需要删除以特定名称结尾的所有文件，可以使用 Dir 函数来遍历文件夹中的文件，然后在循环中使用 Kill 函数逐个删除它们。下面是一个示例代码：

Sub DeleteFiles()
    Dim file As String
    Dim filePath As String
    filePath = "C:\"
    file = Dir(filePath & "*example*.txt")
    Do While file <> ""
        Kill filePath & file
        file = Dir()
    Loop
End Sub

在这个例子中，我们定义了一个名为 filePath 的字符串变量，表示要删除文件的文件夹路径。然后，使用 Dir 函数查找以「example」为名称结尾的所有文本文件，并在循环中使用 Kill 函数逐个删除它们。

总之，在需要删除文件时，可使用 Kill 函数进行操作。但要谨慎操作，因为一旦执行删除操作，文件将永久删除。