SoloCodigo

Hola:
Yo lo empleo frecuentemente.  Por ejemplo, para borrar un fichero, con DeleteAFile( Filename) :

Sub DeleteAFile(EspecArch)
    Dim fso
   
    On Error Resume Next
    Set fso = CreateObject("Scripting.FileSystemObject")
    fso.deletefile (EspecArch)
End Sub

"On Error Resume Next" lo pongo para evitarme en condicionar si existe el fichero; en el caso de que no exista, no lo borra, claro está, pero no da error...