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 vote308 views1 answer
Reference to a non-shared member requires an object reference
VBA
0 vote309 views1 answer
Excel vba urlmon
VBA
3 votes314 views1 answer
Excel vba make long from two shorts
VBA
22 votes407 views1 answer
Excelvba check for directory
VBA
1 vote306 views1 answer
Excel vba Refreshing all pivot tables in workbook
VBA
0 vote309 views1 answer
How to format a textbox as date vb net
VBA
0 vote292 views1 answer
Excel vba move down to next visible cell
VBA
1 vote266 views1 answer
Excel vba hide zero values
VBA
1 vote307 views1 answer
Shortcut to apply a formula to an entire column in excel
VBA
0 vote287 views1 answer
Remove frist letter from string vbnet
VBA