vba 如何删掉桌面指定文件

以下是在 VBA 中删除桌面指定文件的示例代码： ```VBA Sub DeleteDesktopFile() '文件路径和名称 Dim filePath As [string](https://geek.csdn.net/edu/8802d631b97a4a6af1f4d0bbf8527465?dp_token=eyJ0eXAiOiJKV1QiLCJhbGciOiJIUzI1NiJ9.eyJpZCI6NDQ0MDg2MiwiZXhwIjoxNzA3MzcxOTM4LCJpYXQiOjE3MDY3NjcxMzgsInVzZXJuYW1lIjoid2VpeGluXzY4NjQ1NjQ1In0.RrTYEnMNYPC7AQdoij4SBb0kKEgHoyvF-bZOG2eGQvc&spm=1055.2569.3001.10083) filePath = "C:\Users\{用户名}\Desktop\example.txt" '检查文件是否存在 If Dir(filePath) <> "" Then '删除文件 [kill](https://geek.csdn.net/educolumn/09df28b2079fe7a1f1288655cb3c743a?spm=1055.2569.3001.10083) filePath MsgBox "文件已成功删除！", vbInform[ati](https://geek.csdn.net/educolumn/150d7073277950db5f09620704e791cf?spm=1055.2569.3001.10083)on, "提示" '文件不存在 MsgBox "文件未找到，请[确认](https://geek.csdn.net/educolumn/08ce1c98201e391e324feee424502262?spm=1055.2569.3001.10083)路径和名称是否正确！", vbExclamation, "错误" End If End Sub 请将 `filePath` 变量中的路径和文件名替换为您要删除的文件的路径和名称，然后运行此 VBA 代码即可删除该文件。请注意，删除文件后无法恢复，所以请[确认](https://geek.csdn.net/educolumn/08ce1c98201e391e324feee424502262?spm=1055.2569.3001.10083)您确实想要删除这个文件。