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

4 votes214 views1 answer
Excel formula for last non-empty cell in a column
VBA
1 vote217 views1 answer
Vba reverse string
VBA
0 vote223 views1 answer
How to convert weeks to days into textbox with VB site:stackoverflow.com
VBA
0 vote227 views1 answer
Excel vba delete folder
VBA
2 votes167 views2 answers
Vba exit loop
VBA
0 vote237 views1 answer
VBA Loop to range
VBA
5 votes201 views1 answer
Vba array worksheet.index
VBA
0 vote254 views1 answer
Vbnet check if string is only letters
VBA
1 vote223 views1 answer
Vba date to unix timestamp
VBA
0 vote244 views1 answer
Visual stuiod not recognising desgined labels
VBA