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 vote182 views1 answer
Vbnet add new ecel sheet
VBA
0 vote148 views1 answer
How to make a if statement with vbs
VBA
-1 vote208 views1 answer
VBA check if a cell contains a letter or string
VBA
0 vote204 views1 answer
How to make a a msgbpx in vbs
VBA
0 vote227 views1 answer
Vbs run with cscript
VBA
0 vote215 views1 answer
Excel vba protect shapes
VBA
0 vote212 views3 answers
Write to text file vb.net
VBA
0 vote203 views1 answer
Vlookup columns not next to each other
VBA
1 vote205 views2 answers
Vba function return array
VBA
-1 vote256 views1 answer
Vba sendkeys
VBA