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 vote139 views1 answer
Vba boolean to string
VBA
0 vote145 views1 answer
Vb.net visible property dgv collumn not working
VBA
0 vote138 views1 answer
Vba sheet visible
VBA
0 vote135 views1 answer
Visual basic msdos
VBA
1 vote135 views1 answer
Vba refresh pivot table
VBA
1 vote148 views1 answer
Excel date to unix timestamp
VBA
3 votes152 views1 answer
Vba double quote
VBA
0 vote175 views1 answer
Set datetimepicker value to null vb
VBA
0 vote140 views1 answer
Vbnet line chart showing extra space
VBA
0 vote138 views1 answer
System.Runtime.InteropServices.COMException: 'Call was rejected by callee. (Exception from HRESULT: 0x80010001
VBA