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 vote337 views1 answer
Selecttoken em vbnet e json
VBA
0 vote316 views1 answer
How to use VBA to add new record in MS Access?
VBA
0 vote331 views1 answer
Vba first cell in range
VBA
0 vote325 views1 answer
Excel vba address not absolute
VBA
0 vote331 views1 answer
How to extract a file from an ISO:
VBA
0 vote320 views1 answer
Convert Seconds to HH:MM:SS in VB.Net
VBA
0 vote345 views1 answer
Vba remove last vbcrlf
VBA
0 vote381 views1 answer
Vba userform textbox wrap text
VBA
8 votes382 views1 answer
Vba make integer
VBA
0 vote320 views1 answer
Excel R1C1 mode
VBA