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 vote218 views1 answer
Vbnet dynamically change excel sheet name
VBA
1 vote236 views1 answer
Excel vba get column number from column name
VBA
0 vote227 views1 answer
Vbs send keys
VBA
4 votes232 views2 answers
Vba create folder if not exist
VBA
3 votes223 views1 answer
Vba make long from two shorts
VBA
1 vote231 views1 answer
Excel vba Run a Macro every time sheet is changed
VBA
0 vote179 views1 answer
Vbide vbproject reference
VBA
0 vote234 views2 answers
Do until loop vba
VBA
0 vote236 views1 answer
(SecurityProtocolType)3072 vb.net
VBA
0 vote218 views1 answer
How to set location and size of new from vb
VBA