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

0 vote150 views1 answer
Vba search string position
VBA
0 vote127 views1 answer
Vbs exec hidden
VBA
0 vote139 views1 answer
Find database connection string vb
VBA
8 votes211 views1 answer
Excel vba determine number of elements in a 1D array
VBA
-1 vote127 views1 answer
For i in range vba
VBA
0 vote85 views1 answer
Vba set vs dim
VBA
0 vote126 views1 answer
Vb streamreader
VBA
0 vote136 views1 answer
Vba variable number of arguments
VBA
2 votes131 views1 answer
Excel vba check if key is in collection
VBA
3 votes176 views2 answers
Excel "vba" match last value
VBA