Name Statement

Name OldName As String As NewName As String

Sub ExampleReName

On Error GoTo Error

FileCopy "c:\autoexec.bat", "c:\temp\autoexec.sav"

Name "c:\temp\autoexec.sav" As "c:\temp\autoexec.bat"

End

Error:

If err = 58 Then

    msgbox "File already exists"

End If

End

End Sub