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 vote469 views1 answer
Vba change active sheet
VBA
0 vote334 views1 answer
Excel run macro every 5 minutes
VBA
0 vote324 views1 answer
Vbnet check if string is only symbols
VBA
0 vote338 views1 answer
Vba get application version
VBA
0 vote360 views1 answer
Excel vba DisplayAlerts
VBA
0 vote344 views2 answers
How to concatenate more than 40 lines in vba
VBA
1 vote363 views1 answer
Excel how to format bytes as KB, MB, GB
VBA
18 votes491 views3 answers
Excel-vba make integer
VBA
1 vote349 views1 answer
Excel vba Refreshing all pivot tables in workbook
VBA
0 vote362 views1 answer
Delete all controls in an area vb
VBA