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

1 vote156 views1 answer
Highlight selected cell in excel vba
VBA
3 votes150 views1 answer
Vba not equal
VBA
1 vote153 views2 answers
Vba string to date
VBA
0 vote188 views1 answer
Excel vba unlock sheet without password
VBA
3 votes152 views1 answer
Extract the nth word from a text string
VBA
0 vote155 views1 answer
Compare dates vb
VBA
0 vote169 views1 answer
Excel vba open browser
VBA
0 vote102 views1 answer
Excel autofilter vba
VBA
0 vote161 views1 answer
Refresh token em vb net
VBA
0 vote164 views1 answer
Create links in msgbox in vb
VBA