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 vote238 views1 answer
Vb net dgv doesn't keep currency format
VBA
3 votes248 views2 answers
Excel "vba" match last value
VBA
0 vote233 views1 answer
Vba code to select image in sheet
VBA
0 vote235 views1 answer
Vbs write file
VBA
0 vote247 views1 answer
Enable macros on opening workbook vba
VBA
0 vote246 views1 answer
For each item in folder outlook vba
VBA
0 vote251 views1 answer
Find if year is leap year vb
VBA
0 vote264 views1 answer
Vba foreach 2d array
VBA
5 votes249 views1 answer
Excel vba highlight cells using the hex color value within the cells
VBA
0 vote234 views1 answer
Vb net show lines for all axis labels in chart
VBA