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

7 votes180 views1 answer
Excerl vba array to range
VBA
7 votes165 views1 answer
Vba array declaration
VBA
31 votes306 views1 answer
Excel vba function to convert column number to letter
VBA
25 votes311 views3 answers
String to date vb
VBA
5 votes169 views1 answer
Excel vba low word from Long Integer
VBA
0 vote163 views1 answer
Excel vba range contains
VBA
0 vote171 views1 answer
Build an index all files of a FTP site
VBA
1 vote147 views1 answer
Vba compile error object required
VBA
0 vote167 views1 answer
Label de tableau dans des label.text en VBA
VBA
1 vote161 views1 answer
Excel vba Refreshing all pivot tables in workbook
VBA