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 vote219 views1 answer
Excel vba disable keyboard input
VBA
0 vote209 views1 answer
Excel vba extract year
VBA
1 vote225 views1 answer
Excel date to unix timestamp
VBA
3 votes232 views1 answer
Vba not equal
VBA
2 votes212 views1 answer
Excel vba check if key is in collection
VBA
0 vote222 views1 answer
VBA Sort RossetaCode
VBA
0 vote235 views1 answer
Vba keep command window open
VBA
0 vote230 views1 answer
How to format a textbox as date vb net
VBA
1 vote210 views1 answer
Excel vba convert cells(1,1) into A1 and vice versa
VBA
0 vote227 views1 answer
Thread sleep vb
VBA