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 vote128 views1 answer
Excel vba convert cells address
VBA
1 vote122 views1 answer
Excel vba Refreshing all pivot tables in workbook
VBA
0 vote136 views1 answer
Vba copy file
VBA
1 vote115 views1 answer
Excel format cell as kilowatts
VBA
-1 vote149 views1 answer
Code for reading letters only in vb 6
VBA
1 vote119 views1 answer
Textbox find and replace vb
VBA
0 vote136 views1 answer
Open file dialog in vb.net
VBA
0 vote135 views1 answer
Write listbox to text file vb.net
VBA
0 vote116 views2 answers
Excel vba prevent save
VBA
1 vote72 views1 answer
Ms access open form to new record
VBA