Or use FSO
http://www.rondebruin.nl/folder.htm



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"JLatham" <HelpFrom @ Jlathamsite.com.(removethis) wrote in message ...
KILL the NewFilePath file before attempting to copy it with the Name command.

On Error Resume Next
KILL C"\Import Files\Complete\" & TXTFileName
If ERR< 0 Then
ERR.CLEAR
End IF
On Error Goto 0
Name OldFilePath As NewFilePath


" wrote:

Hello all,

I have the following macro snippet that moves a txt file AFTER its
data has been imported into a spreadsheet. It works great as long as
the file doesn't already exist.

Function TXTFileMove()

OldFilePath = "C:\Import Files\New\" & TXTFileName
NewFilePath = C"\Import Files\Complete\" & TXTFileName
Name OldFilePath As NewFilePath

End Function

If the file already exists in that location, the macro halts with the
error:

Run-time error '58': File already exists [End] [Debug]

I've tried enclosing the "path" commands with
Application.DisplayAlerts = False, but it didn't work.