Die Funktion heißt nicht wie vielen anderen Sprachen Rename, sondern nur Name.
Sinnvollerweise sollte man den Fehler bei einer bereits existierenden Datei abfangen.
Entweder über eine Fehlerroutine oder über eine vorherige Abfrage mit Fileexist.
Beispiel:
Sub ReName1 'Fehler prüfen
On Error Goto Fehler
Name "c:\test.sav" as "c:\test.bat"
end
Fehler:
if err = 76 then
msgbox "Datei existiert bereits"
end if
end
end sub
Sub ReName2 'Vorher prüfen
If Fileexists("c:\test.bat")=false
then
Name "c:\test.sav" as "c:\test.bat"
else
msgbox "Datei existiert
bereits"
end if
end sub