VBA 删除excel文件
时间: 2024-10-12 21:08:42 浏览: 34
VBA (Visual Basic for Applications) 是Microsoft Office的一种宏语言,可以用来自动化Excel操作。如果你想通过VBA删除Excel文件,你可以编写一段简单的代码。下面是一个示例:
```vba
Sub DeleteExcelFile()
Dim fileName As String
' 设置你要删除的文件路径及名称
fileName = "C:\path\to\your\file.xlsx"
' 使用FileSystemObject对象来删除文件
If FileExists(fileName) Then
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFile fileName
MsgBox "文件已成功删除", vbInformation
Else
MsgBox "文件不存在", vbError
End If
End Sub
Function FileExists(ByVal filePath As String) As Boolean
On Error Resume Next
FileExists = FileExists(filePath)
On Error GoTo 0
End Function
' 调用函数删除文件
DeleteExcelFile()
```
在这个例子中,`DeleteExcelFile` 函数首先检查文件是否存在,如果存在则使用 `FileSystemObject` 的 `DeleteFile` 方法删除它,并显示消息框告知用户。`FileExists` 函数用于确认文件是否存在。
阅读全文