On error resume next

[DougRobertson]

Hi,

In my macro, there is a segment where it will need to Kill (delete) a file if it exists. However if it does NOT exist, I just want it to skip that command.

It works fine when there is a file to delete, but when there isn't, it stops with an error message "Can't find the file name" or some such thing. I tried putting the ON ERROR RESUME NEXT code one line above it, which works on other applications, but not this one.

Is there another way or command to have the macro disregard the error message and just keep going?

Thanks,

~ Doug

 

[shg]

if len(dir(sfile)) then kill sfile

 

[Norie]

Doug

How about checking if the file exists before you try and kill it?

strFileName = "C:\FileToDelete.xls"
 
If Len(Dir(strFilename))>0 Then
 
      Kill strFileName
 
' optional Else
Else 
 
      MsgBox strFileName & " not found."
End If

 

[DougRobertson]

. . . works like a charm!

Thanks gentlemen.

Just one question though: What does the "Len" stand for? I'm assuming the Dir is Directory.

~ Doug

 

[shg]

Take a look in Help and post back if it's not clear.