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

22 votes403 views1 answer
Xl vba check for folder
VBA
5 votes207 views1 answer
Excel vba first byte from INTEGER
VBA
1 vote173 views1 answer
Textbox find and replace vb
VBA
0 vote178 views1 answer
Vbnet access System.InvalidOperationException: 'Update requires a valid UpdateCommand when passed DataRow collection with modified rows.'
VBA
0 vote191 views1 answer
Como ler subitem de um array em json usando vbnet
VBA
0 vote186 views1 answer
Delete rows in excel vba code
VBA
0 vote195 views1 answer
Excel vba convert cells address
VBA
1 vote165 views1 answer
Vba compile error object required
VBA
0 vote191 views1 answer
Excel vba Column Name to Column Number
VBA
0 vote197 views1 answer
Prive sub enter clicked vb
VBA