Vba delete file

' Needs to add "Microsoft Scripting Runtime" reference to your file
Function FileExists(ByVal FileToTest As String) As Boolean
   FileExists = (Dir(FileToTest) <> "")
End Function

Sub DeleteFile(ByVal FileToDelete As String)
   If FileExists(FileToDelete) Then 'See above          
      ' First remove readonly attribute, if set
      SetAttr FileToDelete, vbNormal          
      ' Then delete the file
      Kill FileToDelete
   End If
End Sub

Source: stackoverflow.com

Similar codes

1 vote340 views1 answer
Random number generator vb.net
VBA
0 vote307 views1 answer
Vba sheet visible
VBA
5 votes360 views1 answer
Excel vba left word from Long Integer
VBA
0 vote306 views1 answer
Set column width of datagridview vb.net
VBA
0 vote343 views1 answer
Create links in msgbox in vb
VBA
0 vote282 views1 answer
Excel vba concatenate range
VBA
1 vote302 views1 answer
Vbscript convert ascii code to character
VBA
1 vote319 views1 answer
VBA Loop through recordset
VBA
5 votes301 views1 answer
Vba array worksheet.index
VBA
0 vote307 views1 answer
Excel vba center userform
VBA